/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / Files / Tele / I-L / Logon⁄Msg Reader ƒ.cpt / Logon_Msg Reader ƒ / Source Code ƒ / Logon_MsgReader

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0f 4c 6f 67 6f 6e 5f | 4d 73 67 52 65 61 64 65 |..Logon_|MsgReade|
|00000010| 72 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |r.......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 63 53 | 6b 00 00 00 00 00 00 00 |.TEXTMcS|k.......|
|00000050| 00 00 00 00 00 2e 51 00 | 00 02 3e a5 02 d7 5d a5 |......Q.|..>...].|
|00000060| 02 d7 5d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..].....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 da 20 00 00 |........|..... ..|
|00000080| 3a 4c 6f 67 6f 6e 0d 45 | 52 41 53 45 20 41 4c 4c |:Logon.E|RASE ALL|
|00000090| 0d 28 54 68 65 20 6e 65 | 78 74 20 74 77 6f 20 6c |.(The ne|xt two l|
|000000a0| 69 6e 65 73 20 63 68 65 | 63 6b 20 74 6f 20 73 65 |ines che|ck to se|
|000000b0| 65 20 69 66 20 7e 57 4b | 20 56 41 52 49 20 69 73 |e if ~WK| VARI is|
|000000c0| 20 69 6e 20 74 68 65 20 | 57 4b 20 66 6f 6c 64 65 | in the |WK folde|
|000000d0| 72 29 0d 55 53 45 52 4f | 50 45 4e 49 20 31 2c 7e |r).USERO|PENI 1,~|
|000000e0| 57 4b 20 56 41 52 49 0d | 55 53 45 52 43 4c 4f 53 |WK VARI.|USERCLOS|
|000000f0| 45 20 31 0d 28 49 66 20 | 74 68 65 20 22 7e 57 4b |E 1.(If |the "~WK|
|00000100| 20 56 41 52 49 22 20 66 | 69 6c 65 20 69 73 6e 27 | VARI" f|ile isn'|
|00000110| 74 20 69 6e 20 74 68 65 | 20 57 68 69 74 65 20 4b |t in the| White K|
|00000120| 6e 69 67 68 74 20 66 6f | 6c 64 65 72 2c 20 79 6f |night fo|lder, yo|
|00000130| 75 20 6e 65 65 64 20 74 | 6f 20 64 6f 20 61 0d 28 |u need t|o do a.(|
|00000140| 73 65 74 75 70 20 73 6f | 2c 20 74 68 65 20 70 72 |setup so|, the pr|
|00000150| 6f 63 20 6a 75 6d 70 73 | 20 74 6f 20 74 68 61 74 |oc jumps| to that|
|00000160| 20 73 65 63 74 69 6f 6e | 2e 29 0d 49 46 20 45 52 | section|.).IF ER|
|00000170| 52 4f 52 20 4a 55 4d 50 | 54 4f 20 53 65 74 75 70 |ROR JUMP|TO Setup|
|00000180| 0d 28 54 68 65 20 6e 65 | 78 74 20 6c 69 6e 65 20 |.(The ne|xt line |
|00000190| 6c 6f 61 64 73 20 74 68 | 65 20 7e 57 4b 20 56 41 |loads th|e ~WK VA|
|000001a0| 52 49 2e 29 0d 4c 4f 41 | 44 56 41 52 20 3a 7e 57 |RI.).LOA|DVAR :~W|
|000001b0| 4b 20 56 41 52 49 0d 28 | 54 68 65 20 6e 65 78 74 |K VARI.(|The next|
|000001c0| 20 6c 69 6e 65 20 73 65 | 74 73 20 74 68 65 20 6d | line se|ts the m|
|000001d0| 6f 64 65 6d 20 61 74 20 | 65 69 74 68 65 72 20 32 |odem at |either 2|
|000001e0| 34 30 30 2d 4e 2d 38 2d | 31 2d 46 55 4c 4c 20 6f |400-N-8-|1-FULL o|
|000001f0| 72 2c 20 31 32 30 30 2d | 4e 2d 38 2d 31 2d 46 55 |r, 1200-|N-8-1-FU|
|00000200| 4c 4c 2e 29 0d 43 4f 4d | 4d 20 41 34 24 0d 28 54 |LL.).COM|M A4$.(T|
|00000210| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 6c 6f 61 |he next |line loa|
|00000220| 64 73 20 74 68 65 20 22 | 47 65 6e 65 72 61 6c 22 |ds the "|General"|
|00000230| 20 73 74 61 74 75 73 20 | 62 61 72 20 69 6e 74 6f | status |bar into|
|00000240| 20 57 68 69 74 65 20 4b | 6e 69 67 68 74 2e 20 49 | White K|night. I|
|00000250| 66 20 79 6f 75 20 77 61 | 6e 74 0d 28 61 20 64 69 |f you wa|nt.(a di|
|00000260| 66 66 65 72 65 6e 74 20 | 73 74 61 74 75 73 20 62 |fferent |status b|
|00000270| 61 72 20 6f 72 2c 20 6e | 6f 20 73 74 61 74 75 73 |ar or, n|o status|
|00000280| 20 62 61 72 20 61 74 20 | 61 6c 6c 2c 20 79 6f 75 | bar at |all, you|
|00000290| 20 63 61 6e 20 63 68 61 | 6e 67 65 20 6f 72 2c 20 | can cha|nge or, |
|000002a0| 64 65 6c 65 74 65 0d 28 | 74 68 65 20 22 47 42 41 |delete.(|the "GBA|
|000002b0| 52 22 2e 29 0d 47 42 41 | 52 0d 28 54 68 65 20 6e |R".).GBA|R.(The n|
|000002c0| 65 78 74 20 6c 69 6e 65 | 73 20 73 65 74 73 20 74 |ext line|s sets t|
|000002d0| 68 65 20 63 6f 73 74 20 | 63 61 6c 63 75 6c 61 74 |he cost |calculat|
|000002e0| 6f 72 20 74 6f 20 24 36 | 20 70 65 72 20 68 6f 75 |or to $6| per hou|
|000002f0| 72 2e 29 0d 53 45 54 43 | 4f 53 54 20 31 30 30 30 |r.).SETC|OST 1000|
|00000300| 0d 28 54 68 65 20 6e 65 | 78 74 20 6c 69 6e 65 20 |.(The ne|xt line |
|00000310| 63 6f 6e 63 61 6e 74 61 | 74 65 73 20 74 68 65 20 |concanta|tes the |
|00000320| 74 65 6c 65 70 68 6f 6e | 65 20 6e 75 6d 62 65 72 |telephon|e number|
|00000330| 20 66 72 6f 6d 20 74 68 | 65 20 22 50 68 6f 6e 65 | from th|e "Phone|
|00000340| 20 6e 75 6d 62 65 72 22 | 20 64 69 61 6c 6f 67 20 | number"| dialog |
|00000350| 0d 28 62 6f 78 20 74 6f | 20 74 68 65 20 64 69 61 |.(box to| the dia|
|00000360| 6c 69 6e 67 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |ling inf|ormation|
|00000370| 20 64 65 74 65 72 6d 69 | 6e 65 64 20 62 79 20 61 | determi|ned by a|
|00000380| 6e 73 77 65 72 69 6e 67 | 20 77 68 65 74 68 65 72 |nswering| whether|
|00000390| 20 79 6f 75 20 68 61 76 | 65 20 61 0d 28 54 6f 75 | you hav|e a.(Tou|
|000003a0| 63 68 74 6f 6e 65 20 70 | 68 6f 6e 65 2c 20 6f 72 |chtone p|hone, or|
|000003b0| 20 6e 6f 74 2e 29 0d 43 | 4f 4e 43 41 54 20 45 24 | not.).C|ONCAT E$|
|000003c0| 2c 44 24 0d 28 54 68 65 | 20 6e 65 78 74 20 6c 69 |,D$.(The| next li|
|000003d0| 6e 65 20 65 6e 74 65 72 | 73 20 74 68 65 20 71 75 |ne enter|s the qu|
|000003e0| 65 73 74 69 6f 6e 20 69 | 6e 74 6f 20 74 68 65 20 |estion i|nto the |
|000003f0| 64 69 61 6c 6f 67 20 62 | 6f 78 20 61 73 6b 69 6e |dialog b|ox askin|
|00000400| 67 20 79 6f 75 20 69 66 | 20 79 6f 75 20 6a 75 73 |g you if| you jus|
|00000410| 74 0d 28 77 61 6e 74 20 | 74 6f 20 6c 6f 67 20 6f |t.(want |to log o|
|00000420| 6e 2e 29 0d 43 4f 50 59 | 49 4e 54 4f 20 58 24 2c |n.).COPY|INTO X$,|
|00000430| 20 44 4f 20 59 4f 55 20 | 4a 55 53 54 20 57 41 4e | DO YOU |JUST WAN|
|00000440| 54 20 54 4f 20 4c 4f 47 | 20 4f 4e 3f 0d 51 55 45 |T TO LOG| ON?.QUE|
|00000450| 52 59 34 0d 28 49 66 20 | 79 6f 75 20 63 6c 69 63 |RY4.(If |you clic|
|00000460| 6b 65 64 20 6f 6e 20 74 | 68 65 20 22 4e 6f 22 20 |ked on t|he "No" |
|00000470| 62 75 74 74 6f 6e 20 69 | 6e 20 74 68 65 20 64 69 |button i|n the di|
|00000480| 61 6c 6f 67 20 62 6f 78 | 20 61 62 6f 76 65 2c 20 |alog box| above, |
|00000490| 74 68 65 20 6e 65 78 74 | 20 6c 69 6e 65 0d 28 6d |the next| line.(m|
|000004a0| 6f 76 65 73 20 79 6f 75 | 20 74 6f 20 74 68 65 20 |oves you| to the |
|000004b0| 22 41 72 63 68 69 76 65 | 20 4d 65 73 73 61 67 65 |"Archive| Message|
|000004c0| 73 20 73 65 63 74 69 6f | 6e 2e 29 0d 49 46 20 4e |s sectio|n.).IF N|
|000004d0| 4f 20 4a 55 4d 50 54 4f | 20 41 72 63 68 69 76 65 |O JUMPTO| Archive|
|000004e0| 20 4d 65 73 73 61 67 65 | 73 0d 28 54 68 65 20 6e | Message|s.(The n|
|000004f0| 65 78 74 20 6c 69 6e 65 | 20 75 73 65 73 20 74 68 |ext line| uses th|
|00000500| 65 20 69 6e 66 6f 72 6d | 61 74 69 6f 6e 20 69 6e |e inform|ation in|
|00000510| 20 74 68 65 20 76 61 72 | 69 61 62 6c 65 20 45 24 | the var|iable E$|
|00000520| 20 74 6f 20 64 69 61 6c | 20 47 45 6e 69 65 2e 20 | to dial| GEnie. |
|00000530| 49 66 20 74 68 65 0d 28 | 6e 75 6d 62 65 72 20 69 |If the.(|number i|
|00000540| 73 20 62 75 73 79 2c 20 | 74 68 65 20 63 6f 6d 6d |s busy, |the comm|
|00000550| 61 6e 64 20 22 52 45 44 | 49 41 4c 22 20 77 69 6c |and "RED|IAL" wil|
|00000560| 6c 20 74 72 79 20 61 67 | 61 69 6e 2e 29 0d 52 45 |l try ag|ain.).RE|
|00000570| 44 49 41 4c 20 45 24 0d | 28 54 68 65 20 6e 65 78 |DIAL E$.|(The nex|
|00000580| 74 20 6c 69 6e 65 20 69 | 73 20 74 68 65 20 22 63 |t line i|s the "c|
|00000590| 6f 6e 6e 65 63 74 22 20 | 70 72 6f 6d 70 74 20 66 |onnect" |prompt f|
|000005a0| 72 6f 6d 20 79 6f 75 72 | 20 6d 6f 64 65 6d 2e 20 |rom your| modem. |
|000005b0| 54 68 65 20 62 61 75 64 | 20 72 61 74 65 20 77 61 |The baud| rate wa|
|000005c0| 73 20 6c 65 66 74 0d 28 | 6f 66 66 20 73 6f 20 74 |s left.(|off so t|
|000005d0| 68 61 74 20 74 68 65 20 | 70 72 6f 63 20 77 6f 75 |hat the |proc wou|
|000005e0| 6c 64 20 72 65 63 6f 67 | 6e 69 7a 65 20 62 6f 74 |ld recog|nize bot|
|000005f0| 68 20 31 32 30 30 20 26 | 20 32 34 30 30 20 63 6f |h 1200 &| 2400 co|
|00000600| 6e 6e 65 63 74 69 6f 6e | 73 2e 29 0d 50 52 4f 4d |nnection|s.).PROM|
|00000610| 50 54 20 43 4f 4e 4e 45 | 43 54 0d 28 54 68 65 20 |PT CONNE|CT.(The |
|00000620| 6e 65 78 74 20 6c 69 6e | 65 20 72 65 73 65 74 73 |next lin|e resets|
|00000630| 20 74 68 65 20 62 69 6c | 6c 69 6e 67 20 63 6c 6f | the bil|ling clo|
|00000640| 63 6b 20 74 6f 20 7a 65 | 72 6f 2e 29 0d 52 45 53 |ck to ze|ro.).RES|
|00000650| 45 54 0d 28 54 68 65 20 | 6e 65 78 74 20 6c 69 6e |ET.(The |next lin|
|00000660| 65 20 70 75 74 73 20 69 | 6e 20 61 20 31 20 73 65 |e puts i|n a 1 se|
|00000670| 63 6f 6e 64 20 70 61 75 | 73 65 20 73 6f 20 74 68 |cond pau|se so th|
|00000680| 61 74 20 65 76 65 72 79 | 74 68 69 6e 67 20 68 61 |at every|thing ha|
|00000690| 73 20 61 20 63 68 61 6e | 63 65 20 74 6f 0d 28 73 |s a chan|ce to.(s|
|000006a0| 65 74 74 6c 65 20 64 6f | 77 6e 20 62 65 66 6f 72 |ettle do|wn befor|
|000006b0| 65 20 57 68 69 74 65 20 | 4b 6e 69 67 68 74 20 73 |e White |Knight s|
|000006c0| 65 6e 64 73 20 61 6e 79 | 20 6d 6f 72 65 20 69 6e |ends any| more in|
|000006d0| 66 6f 72 6d 61 74 69 6f | 6e 2e 20 4e 6f 74 65 20 |formatio|n. Note |
|000006e0| 74 68 61 74 20 74 68 65 | 73 65 0d 28 70 61 75 73 |that the|se.(paus|
|000006f0| 65 73 20 61 72 65 20 75 | 73 65 64 20 62 65 66 6f |es are u|sed befo|
|00000700| 72 65 20 41 4c 4c 20 64 | 61 74 61 20 73 65 6e 74 |re ALL d|ata sent|
|00000710| 20 6f 75 74 20 62 79 20 | 57 68 69 74 65 20 4b 6e | out by |White Kn|
|00000720| 69 67 68 74 2e 29 0d 50 | 41 55 53 45 20 36 30 0d |ight.).P|AUSE 60.|
|00000730| 28 54 68 65 20 6e 65 78 | 74 20 6c 69 6e 65 20 74 |(The nex|t line t|
|00000740| 79 70 65 73 20 69 6e 20 | 74 68 65 20 33 20 48 27 |ypes in |the 3 H'|
|00000750| 73 20 61 6e 64 20 61 20 | 63 61 72 72 69 61 67 65 |s and a |carriage|
|00000760| 20 72 65 74 75 72 6e 20 | 72 65 71 75 69 72 65 64 | return |required|
|00000770| 20 74 6f 20 73 74 61 72 | 74 0d 28 6f 6e 20 47 45 | to star|t.(on GE|
|00000780| 6e 69 65 2e 20 28 54 68 | 65 20 22 5e 4d 22 20 69 |nie. (Th|e "^M" i|
|00000790| 73 20 74 68 65 20 63 61 | 72 72 69 61 67 65 20 72 |s the ca|rriage r|
|000007a0| 65 74 75 72 6e 2e 29 0d | 54 59 50 45 20 48 48 48 |eturn.).|TYPE HHH|
|000007b0| 5e 4d 0d 28 54 68 65 20 | 6e 65 78 74 20 6c 69 6e |^M.(The |next lin|
|000007c0| 65 20 69 73 20 74 68 65 | 20 22 55 23 3d 22 20 70 |e is the| "U#=" p|
|000007d0| 72 6f 6d 70 74 20 74 68 | 61 74 20 47 45 6e 69 65 |rompt th|at GEnie|
|000007e0| 20 73 65 6e 64 73 20 79 | 6f 75 2e 20 54 68 69 73 | sends y|ou. This|
|000007f0| 20 69 73 20 77 68 61 74 | 20 74 68 65 20 70 72 6f | is what| the pro|
|00000800| 63 0d 28 68 61 73 20 74 | 6f 20 77 61 69 74 20 66 |c.(has t|o wait f|
|00000810| 6f 72 2c 20 62 65 66 6f | 72 65 20 73 65 6e 64 69 |or, befo|re sendi|
|00000820| 6e 67 20 47 45 6e 69 65 | 20 79 6f 75 72 20 61 63 |ng GEnie| your ac|
|00000830| 63 6f 75 6e 74 20 6e 75 | 6d 62 65 72 20 26 20 70 |count nu|mber & p|
|00000840| 61 73 73 77 6f 72 64 2e | 29 0d 50 52 4f 4d 50 54 |assword.|).PROMPT|
|00000850| 20 55 23 3d 0d 50 41 55 | 53 45 20 36 30 0d 28 54 | U#=.PAU|SE 60.(T|
|00000860| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 74 79 70 |he next |line typ|
|00000870| 65 73 20 69 6e 20 74 68 | 65 20 69 6e 66 6f 72 6d |es in th|e inform|
|00000880| 61 74 69 6f 6e 20 74 6f | 20 47 45 6e 69 65 20 74 |ation to| GEnie t|
|00000890| 68 61 74 20 77 61 73 20 | 6f 62 74 61 69 6e 65 64 |hat was |obtained|
|000008a0| 20 66 72 6f 6d 20 74 68 | 65 0d 28 22 41 63 63 6f | from th|e.("Acco|
|000008b0| 75 6e 74 20 6e 75 6d 62 | 65 72 22 20 64 69 61 6c |unt numb|er" dial|
|000008c0| 6f 67 20 62 6f 78 20 61 | 6e 64 20 74 68 65 20 22 |og box a|nd the "|
|000008d0| 50 61 73 73 77 6f 72 64 | 22 20 64 69 61 6c 6f 67 |Password|" dialog|
|000008e0| 20 62 6f 78 2e 29 0d 54 | 59 50 45 20 41 24 0d 54 | box.).T|YPE A$.T|
|000008f0| 59 50 45 20 5e 4d 0d 28 | 54 68 65 20 6e 65 78 74 |YPE ^M.(|The next|
|00000900| 20 6c 69 6e 65 20 69 73 | 20 74 68 65 20 70 72 6f | line is| the pro|
|00000910| 6d 70 74 20 74 68 61 74 | 20 47 45 6e 69 65 20 73 |mpt that| GEnie s|
|00000920| 65 6e 64 73 20 79 6f 75 | 2c 20 61 74 20 74 68 65 |ends you|, at the|
|00000930| 20 65 6e 64 20 6f 66 20 | 74 68 65 20 62 61 73 69 | end of |the basi|
|00000940| 63 20 6c 6f 67 0d 28 6f | 6e 20 62 61 6e 6e 65 72 |c log.(o|n banner|
|00000950| 2e 29 0d 50 52 4f 4d 50 | 54 20 63 6f 6e 74 69 6e |.).PROMP|T contin|
|00000960| 75 65 3f 0d 28 54 68 65 | 20 6e 65 78 74 20 6c 69 |ue?.(The| next li|
|00000970| 6e 65 20 73 65 74 73 20 | 79 6f 75 72 20 6d 6f 64 |ne sets |your mod|
|00000980| 65 6d 20 74 6f 20 68 61 | 6c 66 20 64 75 70 6c 65 |em to ha|lf duple|
|00000990| 78 20 73 6f 20 79 6f 75 | 20 63 61 6e 20 73 65 65 |x so you| can see|
|000009a0| 20 77 68 61 74 20 79 6f | 75 20 74 79 70 65 0d 28 | what yo|u type.(|
|000009b0| 6f 6e 20 47 45 6e 69 65 | 2e 29 0d 43 4f 4d 4d 20 |on GEnie|.).COMM |
|000009c0| 48 41 4c 46 0d 50 41 55 | 53 45 20 36 30 0d 28 54 |HALF.PAU|SE 60.(T|
|000009d0| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 6d 6f 76 |he next |line mov|
|000009e0| 65 73 20 79 6f 75 20 6f | 76 65 72 20 74 6f 20 74 |es you o|ver to t|
|000009f0| 68 65 20 4d 61 63 20 52 | 54 2e 29 0d 54 59 50 45 |he Mac R|T.).TYPE|
|00000a00| 20 6d 36 30 35 5e 4d 0d | 28 54 68 65 20 6e 65 78 | m605^M.|(The nex|
|00000a10| 74 20 6c 69 6e 65 20 65 | 6e 64 73 20 74 68 65 20 |t line e|nds the |
|00000a20| 4c 6f 67 6f 6e 20 73 65 | 63 74 69 6f 6e 20 6f 66 |Logon se|ction of|
|00000a30| 20 74 68 65 20 70 72 6f | 63 2e 29 0d 45 4e 44 0d | the pro|c.).END.|
|00000a40| 28 54 68 65 20 6e 65 78 | 74 20 6c 69 6e 65 20 73 |(The nex|t line s|
|00000a50| 74 61 72 74 73 20 74 68 | 65 20 22 41 72 63 68 69 |tarts th|e "Archi|
|00000a60| 76 65 20 4d 65 73 73 61 | 67 65 73 20 73 65 63 74 |ve Messa|ges sect|
|00000a70| 69 6f 6e 2e 29 0d 3a 41 | 72 63 68 69 76 65 20 4d |ion.).:A|rchive M|
|00000a80| 65 73 73 61 67 65 73 0d | 28 54 68 65 20 6e 65 78 |essages.|(The nex|
|00000a90| 74 20 66 69 76 65 20 6c | 69 6e 65 73 20 74 65 73 |t five l|ines tes|
|00000aa0| 74 20 74 6f 20 62 65 20 | 73 75 72 65 20 74 68 61 |t to be |sure tha|
|00000ab0| 74 20 74 68 65 20 64 65 | 73 74 69 6e 61 74 69 6f |t the de|stinatio|
|00000ac0| 6e 20 66 6f 6c 64 65 72 | 20 68 61 73 6e 27 74 20 |n folder| hasn't |
|00000ad0| 62 65 65 6e 0d 28 63 68 | 61 6e 67 65 64 2e 20 54 |been.(ch|anged. T|
|00000ae0| 68 69 73 20 69 73 20 64 | 6f 6e 65 20 62 79 20 63 |his is d|one by c|
|00000af0| 6f 70 79 69 6e 67 20 74 | 68 65 20 70 61 74 68 20 |opying t|he path |
|00000b00| 6e 61 6d 65 20 73 74 6f | 72 65 64 20 69 6e 20 74 |name sto|red in t|
|00000b10| 68 65 20 46 24 20 76 61 | 72 69 61 62 6c 65 0d 28 |he F$ va|riable.(|
|00000b20| 69 6e 74 6f 20 74 68 65 | 20 47 24 20 76 61 72 69 |into the| G$ vari|
|00000b30| 61 62 6c 65 2c 20 74 68 | 65 6e 2c 20 63 6f 70 79 |able, th|en, copy|
|00000b40| 69 6e 67 20 74 68 65 20 | 74 65 78 74 20 22 3a 7e |ing the |text ":~|
|00000b50| 54 65 73 74 22 20 69 6e | 74 6f 20 74 68 65 20 47 |Test" in|to the G|
|00000b60| 32 24 20 76 61 72 69 61 | 62 6c 65 2c 0d 28 74 68 |2$ varia|ble,.(th|
|00000b70| 65 6e 2c 20 63 6f 6e 63 | 61 6e 74 61 74 69 6e 67 |en, conc|antating|
|00000b80| 20 74 68 65 20 66 69 6c | 65 20 6e 61 6d 65 20 22 | the fil|e name "|
|00000b90| 7e 54 65 73 74 22 20 69 | 6e 74 6f 20 74 68 65 20 |~Test" i|nto the |
|00000ba0| 47 24 20 76 61 72 69 61 | 62 6c 65 20 61 6e 64 2c |G$ varia|ble and,|
|00000bb0| 20 66 69 6e 61 6c 6c 79 | 2c 0d 28 61 74 74 65 6d | finally|,.(attem|
|00000bc0| 70 74 69 6e 67 20 74 6f | 20 6f 70 65 6e 20 6f 72 |pting to| open or|
|00000bd0| 2c 20 63 72 65 61 74 65 | 2c 20 74 68 61 74 20 66 |, create|, that f|
|00000be0| 69 6c 65 2e 20 49 66 20 | 74 68 65 20 70 61 74 68 |ile. If |the path|
|00000bf0| 6e 61 6d 65 20 68 61 73 | 20 63 68 61 6e 67 65 64 |name has| changed|
|00000c00| 2c 20 61 6e 0d 28 45 72 | 72 6f 72 20 66 6c 61 67 |, an.(Er|ror flag|
|00000c10| 20 77 69 6c 6c 20 62 65 | 20 73 65 74 2e 29 0d 43 | will be| set.).C|
|00000c20| 4f 50 59 49 4e 54 4f 20 | 47 24 2c 46 24 0d 43 4f |OPYINTO |G$,F$.CO|
|00000c30| 50 59 49 4e 54 4f 20 47 | 32 24 2c 3a 7e 54 65 73 |PYINTO G|2$,:~Tes|
|00000c40| 74 0d 43 4f 4e 43 41 54 | 20 47 24 2c 47 32 24 0d |t.CONCAT| G$,G2$.|
|00000c50| 52 45 43 4e 20 47 24 0d | 43 4c 4f 53 45 0d 55 53 |RECN G$.|CLOSE.US|
|00000c60| 45 52 4f 50 45 4e 49 20 | 31 2c 47 24 0d 55 53 45 |EROPENI |1,G$.USE|
|00000c70| 52 43 4c 4f 53 45 20 31 | 0d 28 54 68 65 20 6e 65 |RCLOSE 1|.(The ne|
|00000c80| 78 74 20 6c 69 6e 65 20 | 6a 75 6d 70 73 20 74 6f |xt line |jumps to|
|00000c90| 20 74 68 65 20 22 4f 6f | 70 73 22 20 73 65 63 74 | the "Oo|ps" sect|
|00000ca0| 69 6f 6e 20 69 66 20 74 | 68 65 20 65 72 72 6f 72 |ion if t|he error|
|00000cb0| 20 66 6c 61 67 20 69 73 | 20 73 65 74 2e 29 0d 49 | flag is| set.).I|
|00000cc0| 46 20 45 52 52 4f 52 20 | 4a 55 4d 50 54 4f 20 4f |F ERROR |JUMPTO O|
|00000cd0| 6f 70 73 0d 28 54 68 65 | 20 6e 65 78 74 20 6c 69 |ops.(The| next li|
|00000ce0| 6e 65 20 65 6e 74 65 72 | 73 20 61 20 75 6e 69 71 |ne enter|s a uniq|
|00000cf0| 75 65 20 66 69 6c 65 20 | 6e 61 6d 65 2c 20 62 61 |ue file |name, ba|
|00000d00| 73 65 64 20 6f 6e 20 61 | 20 64 61 74 65 2f 74 69 |sed on a| date/ti|
|00000d10| 6d 65 20 73 74 61 6d 70 | 2c 20 69 6e 74 6f 20 74 |me stamp|, into t|
|00000d20| 68 65 0d 28 76 61 72 69 | 61 62 6c 65 20 41 32 24 |he.(vari|able A2$|
|00000d30| 2e 29 0d 55 4e 49 51 55 | 45 20 41 32 24 0d 28 54 |.).UNIQU|E A2$.(T|
|00000d40| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 63 61 6c |he next |line cal|
|00000d50| 63 75 6c 61 74 65 73 20 | 74 68 65 20 6e 75 6d 62 |culates |the numb|
|00000d60| 65 72 20 6f 66 20 63 68 | 61 72 61 63 74 65 72 73 |er of ch|aracters|
|00000d70| 20 69 6e 20 74 68 65 20 | 76 61 72 69 61 62 6c 65 | in the |variable|
|00000d80| 2c 20 41 32 24 2c 20 61 | 6e 64 0d 28 70 75 74 73 |, A2$, a|nd.(puts|
|00000d90| 20 74 68 61 74 20 6e 75 | 6d 62 65 72 20 69 6e 74 | that nu|mber int|
|00000da0| 6f 20 74 68 65 20 76 61 | 72 69 61 62 6c 65 20 41 |o the va|riable A|
|00000db0| 24 2e 29 0d 4c 45 4e 47 | 54 48 20 41 25 2c 41 32 |$.).LENG|TH A%,A2|
|00000dc0| 24 0d 28 54 68 65 20 6e | 65 78 74 20 6c 69 6e 65 |$.(The n|ext line|
|00000dd0| 20 73 75 62 74 72 61 63 | 74 20 34 20 66 72 6f 6d | subtrac|t 4 from|
|00000de0| 20 74 68 65 20 6e 75 6d | 62 65 72 20 69 6e 20 74 | the num|ber in t|
|00000df0| 68 65 20 76 61 72 69 61 | 62 6c 65 20 41 25 2e 29 |he varia|ble A%.)|
|00000e00| 0d 53 55 42 54 52 41 43 | 54 20 41 25 2c 34 0d 28 |.SUBTRAC|T A%,4.(|
|00000e10| 54 68 65 20 6e 65 78 74 | 20 6c 69 6e 65 20 63 6f |The next| line co|
|00000e20| 70 69 65 73 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |pies the| number |
|00000e30| 6f 66 20 63 68 61 72 61 | 63 74 65 72 73 20 73 70 |of chara|cters sp|
|00000e40| 65 63 69 66 69 65 64 20 | 69 6e 20 74 68 65 20 76 |ecified |in the v|
|00000e50| 61 72 69 61 62 6c 65 20 | 41 24 2c 0d 28 66 72 6f |ariable |A$,.(fro|
|00000e60| 6d 20 74 68 65 20 72 69 | 67 68 74 20 73 69 64 65 |m the ri|ght side|
|00000e70| 20 6f 66 20 74 68 65 20 | 75 6e 69 71 75 65 20 66 | of the |unique f|
|00000e80| 69 6c 65 20 6e 61 6d 65 | 20 69 6e 20 74 68 65 20 |ile name| in the |
|00000e90| 76 61 72 69 61 62 6c 65 | 20 41 32 24 2c 20 61 6e |variable| A2$, an|
|00000ea0| 64 20 63 6f 70 69 65 73 | 0d 28 74 68 65 6d 20 69 |d copies|.(them i|
|00000eb0| 6e 74 6f 20 74 68 65 20 | 76 61 72 69 61 62 6c 65 |nto the |variable|
|00000ec0| 20 41 33 24 2e 20 41 6c | 6c 20 6f 66 20 74 68 69 | A3$. Al|l of thi|
|00000ed0| 73 20 77 61 73 20 6e 65 | 63 65 73 73 61 72 79 20 |s was ne|cessary |
|00000ee0| 74 6f 20 65 6c 69 6d 69 | 6e 61 74 65 20 74 68 65 |to elimi|nate the|
|00000ef0| 20 77 6f 72 64 0d 28 22 | 46 69 6c 65 22 20 66 72 | word.("|File" fr|
|00000f00| 6f 6d 20 74 68 65 20 55 | 6e 69 71 75 65 20 66 69 |om the U|nique fi|
|00000f10| 6c 65 20 6e 61 6d 65 2e | 29 0d 52 49 47 48 54 24 |le name.|).RIGHT$|
|00000f20| 20 41 33 24 2c 41 25 2c | 41 32 24 0d 28 54 68 65 | A3$,A%,|A2$.(The|
|00000f30| 20 6e 65 78 74 20 6c 69 | 6e 65 20 65 6e 74 65 72 | next li|ne enter|
|00000f40| 20 74 68 65 20 74 65 78 | 74 20 22 3a 4d 61 63 42 | the tex|t ":MacB|
|00000f50| 42 20 22 20 69 6e 74 6f | 20 74 68 65 20 76 61 72 |B " into| the var|
|00000f60| 69 61 62 6c 65 20 42 32 | 24 2e 29 0d 43 4f 50 59 |iable B2|$.).COPY|
|00000f70| 49 4e 54 4f 20 42 32 24 | 2c 3a 4d 61 63 42 42 20 |INTO B2$|,:MacBB |
|00000f80| 0d 28 54 68 65 20 6e 65 | 78 74 20 6c 69 6e 65 20 |.(The ne|xt line |
|00000f90| 63 6f 6e 63 61 6e 74 61 | 74 65 73 20 74 68 65 20 |concanta|tes the |
|00000fa0| 75 6e 69 71 75 65 20 66 | 69 6c 65 20 6e 61 6d 65 |unique f|ile name|
|00000fb0| 20 69 6e 20 41 33 24 20 | 74 6f 20 74 68 65 20 65 | in A3$ |to the e|
|00000fc0| 6e 64 20 6f 66 20 74 68 | 65 20 64 61 74 61 0d 28 |nd of th|e data.(|
|00000fd0| 69 6e 20 42 32 24 2e 29 | 0d 43 4f 4e 43 41 54 20 |in B2$.)|.CONCAT |
|00000fe0| 42 32 24 2c 41 33 24 0d | 28 54 68 65 20 6e 65 78 |B2$,A3$.|(The nex|
|00000ff0| 74 20 6c 69 6e 65 20 63 | 6f 6e 63 61 6e 74 61 74 |t line c|oncantat|
|00001000| 65 73 20 74 68 65 20 75 | 6e 69 71 75 65 20 66 69 |es the u|nique fi|
|00001010| 6c 65 20 6e 61 6d 65 20 | 69 6e 20 42 32 24 20 74 |le name |in B2$ t|
|00001020| 6f 20 74 68 65 20 70 61 | 74 68 6e 61 6d 65 20 6f |o the pa|thname o|
|00001030| 66 20 74 68 65 0d 28 66 | 6f 6c 64 65 72 20 73 65 |f the.(f|older se|
|00001040| 6c 65 63 74 65 64 20 76 | 69 61 20 74 68 65 20 47 |lected v|ia the G|
|00001050| 45 54 56 4f 4c 20 63 6f | 6d 6d 61 6e 64 20 69 6e |ETVOL co|mmand in|
|00001060| 20 74 68 65 20 22 53 65 | 74 75 70 22 20 73 65 63 | the "Se|tup" sec|
|00001070| 74 69 6f 6e 2e 29 0d 43 | 4f 4e 43 41 54 20 46 24 |tion.).C|ONCAT F$|
|00001080| 2c 42 32 24 0d 28 54 68 | 65 20 6e 65 78 74 20 31 |,B2$.(Th|e next 1|
|00001090| 33 20 6c 69 6e 65 73 20 | 28 75 70 20 74 6f 20 22 |3 lines |(up to "|
|000010a0| 54 59 50 45 20 6d 36 30 | 35 3b 31 5e 4d 22 29 20 |TYPE m60|5;1^M") |
|000010b0| 61 72 65 20 74 68 65 20 | 73 61 6d 65 20 61 73 20 |are the |same as |
|000010c0| 69 6e 20 74 68 65 20 22 | 4c 6f 67 6f 6e 22 0d 28 |in the "|Logon".(|
|000010d0| 73 65 63 74 69 6f 6e 20 | 61 6e 64 2c 20 61 72 65 |section |and, are|
|000010e0| 20 61 6e 6e 6f 74 61 74 | 65 64 20 74 68 65 72 65 | annotat|ed there|
|000010f0| 2e 29 0d 52 45 44 49 41 | 4c 20 45 24 0d 50 52 4f |.).REDIA|L E$.PRO|
|00001100| 4d 50 54 20 43 4f 4e 4e | 45 43 54 0d 52 45 53 45 |MPT CONN|ECT.RESE|
|00001110| 54 0d 50 41 55 53 45 20 | 36 30 0d 54 59 50 45 20 |T.PAUSE |60.TYPE |
|00001120| 48 48 48 5e 4d 0d 50 52 | 4f 4d 50 54 20 55 23 3d |HHH^M.PR|OMPT U#=|
|00001130| 0d 50 41 55 53 45 20 36 | 30 0d 54 59 50 45 20 41 |.PAUSE 6|0.TYPE A|
|00001140| 24 0d 54 59 50 45 20 5e | 4d 0d 50 52 4f 4d 50 54 |$.TYPE ^|M.PROMPT|
|00001150| 20 63 6f 6e 74 69 6e 75 | 65 3f 0d 43 4f 4d 4d 20 | continu|e?.COMM |
|00001160| 48 41 4c 46 0d 50 41 55 | 53 45 20 36 30 0d 28 54 |HALF.PAU|SE 60.(T|
|00001170| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 6d 6f 76 |he next |line mov|
|00001180| 65 73 20 79 6f 75 20 64 | 69 72 65 63 74 6c 79 20 |es you d|irectly |
|00001190| 69 6e 74 6f 20 74 68 65 | 20 4d 61 63 20 42 75 6c |into the| Mac Bul|
|000011a0| 6c 65 74 69 6e 20 42 6f | 61 72 64 2e 29 0d 54 59 |letin Bo|ard.).TY|
|000011b0| 50 45 20 6d 36 30 35 3b | 31 5e 4d 0d 28 54 68 65 |PE m605;|1^M.(The|
|000011c0| 20 6e 65 78 74 20 6c 69 | 6e 65 20 69 73 20 74 68 | next li|ne is th|
|000011d0| 65 20 70 72 6f 6d 70 74 | 20 47 45 6e 69 65 20 73 |e prompt| GEnie s|
|000011e0| 65 6e 64 73 20 79 6f 75 | 20 77 68 65 6e 20 79 6f |ends you| when yo|
|000011f0| 75 20 6c 6f 67 20 6f 6e | 74 6f 20 74 68 65 20 4d |u log on|to the M|
|00001200| 61 63 20 42 42 2e 29 0d | 50 52 4f 4d 50 54 20 31 |ac BB.).|PROMPT 1|
|00001210| 20 3f 0d 28 54 68 65 20 | 6e 65 78 74 20 6c 69 6e | ?.(The |next lin|
|00001220| 65 20 6f 70 65 6e 73 20 | 61 20 6e 65 77 20 66 69 |e opens |a new fi|
|00001230| 6c 65 20 69 6e 20 74 68 | 65 20 66 6f 6c 64 65 72 |le in th|e folder|
|00001240| 20 73 65 6c 65 63 74 65 | 64 20 64 75 72 69 6e 67 | selecte|d during|
|00001250| 20 74 68 65 20 73 65 74 | 75 70 2e 20 49 74 0d 28 | the set|up. It.(|
|00001260| 68 61 73 20 74 68 65 20 | 6e 61 6d 65 3a 20 22 4d |has the |name: "M|
|00001270| 61 63 42 42 20 3c 64 61 | 74 65 2f 74 69 6d 65 20 |acBB <da|te/time |
|00001280| 73 74 61 6d 70 3e 22 2e | 20 45 76 65 72 79 74 68 |stamp>".| Everyth|
|00001290| 69 6e 67 20 74 68 61 74 | 20 47 45 6e 69 65 20 73 |ing that| GEnie s|
|000012a0| 65 6e 64 73 20 79 6f 75 | 20 66 72 6f 6d 0d 28 68 |ends you| from.(h|
|000012b0| 65 72 65 20 77 69 6c 6c | 20 62 65 20 77 72 69 74 |ere will| be writ|
|000012c0| 74 65 6e 20 74 6f 20 79 | 6f 75 72 20 68 61 72 64 |ten to y|our hard|
|000012d0| 20 64 72 69 76 65 20 75 | 6e 74 69 6c 20 74 68 65 | drive u|ntil the|
|000012e0| 2c 20 22 43 4c 4f 53 45 | 22 20 63 6f 6d 6d 61 6e |, "CLOSE|" comman|
|000012f0| 64 2e 29 0d 52 45 43 4e | 20 46 24 0d 50 41 55 53 |d.).RECN| F$.PAUS|
|00001300| 45 20 36 30 0d 28 54 68 | 65 20 6e 65 78 74 20 6c |E 60.(Th|e next l|
|00001310| 69 6e 65 20 74 65 6c 6c | 73 20 47 45 6e 69 65 20 |ine tell|s GEnie |
|00001320| 74 6f 20 72 65 61 64 20 | 61 6c 6c 20 6e 65 77 20 |to read |all new |
|00001330| 6d 65 73 73 61 67 65 73 | 2e 29 0d 54 59 50 45 20 |messages|.).TYPE |
|00001340| 62 72 6f 20 61 6c 6c 20 | 6e 6f 72 5e 4d 0d 28 54 |bro all |nor^M.(T|
|00001350| 68 65 20 22 31 20 3f 22 | 20 63 6f 6d 65 73 20 75 |he "1 ?"| comes u|
|00001360| 70 20 61 67 61 69 6e 20 | 61 66 74 65 72 20 61 6c |p again |after al|
|00001370| 6c 20 6f 66 20 74 68 65 | 20 6d 65 73 73 61 67 65 |l of the| message|
|00001380| 73 20 68 61 76 65 20 62 | 65 65 6e 20 72 65 61 64 |s have b|een read|
|00001390| 2e 29 0d 50 52 4f 4d 50 | 54 20 31 20 3f 0d 28 54 |.).PROMP|T 1 ?.(T|
|000013a0| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 63 6c 6f |he next |line clo|
|000013b0| 73 65 73 20 74 68 65 20 | 66 69 6c 65 20 63 72 65 |ses the |file cre|
|000013c0| 61 74 65 64 20 61 62 6f | 76 65 2e 29 0d 43 4c 4f |ated abo|ve.).CLO|
|000013d0| 53 45 0d 50 41 55 53 45 | 20 36 30 0d 28 54 68 65 |SE.PAUSE| 60.(The|
|000013e0| 20 6e 65 78 74 20 6c 69 | 6e 65 20 6c 6f 67 73 20 | next li|ne logs |
|000013f0| 79 6f 75 20 6f 66 66 20 | 47 45 6e 69 65 2e 29 0d |you off |GEnie.).|
|00001400| 54 59 50 45 20 62 79 65 | 5e 4d 0d 28 54 68 65 20 |TYPE bye|^M.(The |
|00001410| 6e 65 78 74 20 6c 69 6e | 65 20 69 73 20 74 68 65 |next lin|e is the|
|00001420| 20 70 72 6f 6d 70 74 20 | 79 6f 75 27 6c 6c 20 72 | prompt |you'll r|
|00001430| 65 63 65 69 76 65 20 61 | 66 74 65 72 20 47 45 6e |eceive a|fter GEn|
|00001440| 69 65 20 68 61 6e 67 73 | 20 75 70 2e 29 0d 50 52 |ie hangs| up.).PR|
|00001450| 4f 4d 50 54 20 4e 4f 20 | 43 41 52 52 49 45 52 0d |OMPT NO |CARRIER.|
|00001460| 28 54 68 65 6e 20 6e 65 | 78 74 20 6c 69 6e 65 20 |(Then ne|xt line |
|00001470| 72 69 6e 67 73 20 61 20 | 62 65 6c 6c 20 74 6f 20 |rings a |bell to |
|00001480| 6c 65 74 20 79 6f 75 20 | 6b 6e 6f 77 20 74 68 61 |let you |know tha|
|00001490| 74 20 74 68 65 20 70 72 | 6f 63 65 64 75 72 65 20 |t the pr|ocedure |
|000014a0| 69 73 20 64 6f 6e 65 2e | 29 0d 42 45 4c 4c 0d 45 |is done.|).BELL.E|
|000014b0| 4e 44 0d 28 54 68 65 20 | 6e 65 78 74 20 6c 69 6e |ND.(The |next lin|
|000014c0| 65 20 73 74 61 72 74 73 | 20 74 68 65 20 6f 6e 65 |e starts| the one|
|000014d0| 20 74 69 6d 65 20 73 65 | 74 75 70 2e 29 0d 3a 53 | time se|tup.).:S|
|000014e0| 65 74 75 70 0d 28 54 68 | 65 20 6e 65 78 74 20 6c |etup.(Th|e next l|
|000014f0| 69 6e 65 20 65 72 61 73 | 65 73 20 61 6c 6c 20 6f |ine eras|es all o|
|00001500| 66 20 74 68 65 20 76 61 | 72 69 61 62 6c 65 73 20 |f the va|riables |
|00001510| 69 6e 20 57 68 69 74 65 | 20 4b 6e 69 67 68 74 2e |in White| Knight.|
|00001520| 29 0d 45 52 41 53 45 20 | 41 4c 4c 0d 28 54 68 65 |).ERASE |ALL.(The|
|00001530| 20 6e 65 78 74 20 74 68 | 72 65 65 20 6c 69 6e 65 | next th|ree line|
|00001540| 73 20 61 72 65 20 77 68 | 61 74 20 73 68 6f 77 73 |s are wh|at shows|
|00001550| 20 75 70 20 69 6e 20 74 | 68 65 20 66 69 72 73 74 | up in t|he first|
|00001560| 20 64 69 61 6c 6f 67 20 | 62 6f 78 2e 29 0d 43 4f | dialog |box.).CO|
|00001570| 50 59 49 4e 54 4f 20 58 | 24 2c 59 6f 75 20 77 69 |PYINTO X|$,You wi|
|00001580| 6c 6c 20 6e 65 65 64 20 | 74 6f 20 64 6f 20 61 20 |ll need |to do a |
|00001590| 6f 6e 65 20 74 69 6d 65 | 20 73 65 74 75 70 2e 0d |one time| setup..|
|000015a0| 43 4f 50 59 49 4e 54 4f | 20 59 24 2c 4d 61 6b 65 |COPYINTO| Y$,Make|
|000015b0| 20 73 75 72 65 20 79 6f | 75 20 68 61 76 65 20 61 | sure yo|u have a|
|000015c0| 6c 6c 20 79 6f 75 72 20 | 69 6e 66 6f 72 6d 61 74 |ll your |informat|
|000015d0| 69 6f 6e 20 68 61 6e 64 | 79 2e 0d 43 4f 50 59 49 |ion hand|y..COPYI|
|000015e0| 4e 54 4f 20 5a 24 2c 41 | 72 65 20 79 6f 75 20 72 |NTO Z$,A|re you r|
|000015f0| 65 61 64 79 20 74 6f 20 | 70 72 6f 63 65 64 65 3f |eady to |procede?|
|00001600| 0d 51 55 45 52 59 33 0d | 28 49 66 20 79 6f 75 20 |.QUERY3.|(If you |
|00001610| 61 6e 73 77 65 72 20 22 | 6e 6f 22 20 74 6f 3a 20 |answer "|no" to: |
|00001620| 22 72 65 61 64 79 20 74 | 6f 20 70 72 6f 63 65 64 |"ready t|o proced|
|00001630| 65 3f 22 2c 20 74 68 65 | 20 70 72 6f 63 20 65 6e |e?", the| proc en|
|00001640| 64 73 20 68 65 72 65 2c | 20 6f 74 68 65 72 77 69 |ds here,| otherwi|
|00001650| 73 65 20 69 74 0d 28 63 | 6f 6e 74 69 6e 75 65 73 |se it.(c|ontinues|
|00001660| 20 6f 6e 20 74 6f 20 74 | 68 65 20 6e 65 78 74 20 | on to t|he next |
|00001670| 64 69 61 6c 6f 67 20 62 | 6f 78 2e 29 0d 49 46 20 |dialog b|ox.).IF |
|00001680| 4e 4f 20 45 4e 44 0d 28 | 54 68 65 20 6e 65 78 74 |NO END.(|The next|
|00001690| 20 74 68 72 65 65 20 6c | 69 6e 65 73 20 61 72 65 | three l|ines are|
|000016a0| 20 74 68 65 20 6f 6e 65 | 73 20 73 65 65 6e 20 69 | the one|s seen i|
|000016b0| 6e 20 74 68 65 20 73 65 | 63 6f 6e 64 20 64 69 61 |n the se|cond dia|
|000016c0| 6c 6f 67 20 62 6f 78 2e | 29 0d 43 4f 50 59 49 4e |log box.|).COPYIN|
|000016d0| 54 4f 20 58 24 2c 50 6c | 65 61 73 65 20 74 79 70 |TO X$,Pl|ease typ|
|000016e0| 65 20 69 6e 20 79 6f 75 | 72 20 6c 6f 63 61 6c 20 |e in you|r local |
|000016f0| 47 45 6e 69 65 20 61 63 | 63 65 73 73 20 6e 75 6d |GEnie ac|cess num|
|00001700| 62 65 72 2e 0d 43 4f 50 | 59 49 4e 54 4f 20 59 24 |ber..COP|YINTO Y$|
|00001710| 2c 44 6f 6e 27 74 20 70 | 75 74 20 61 6e 79 20 73 |,Don't p|ut any s|
|00001720| 70 61 63 65 73 20 6f 72 | 20 64 61 73 68 65 73 20 |paces or| dashes |
|00001730| 62 65 74 77 65 65 6e 20 | 74 68 65 20 6e 75 6d 62 |between |the numb|
|00001740| 65 72 73 2e 0d 43 4f 50 | 59 49 4e 54 4f 20 5a 24 |ers..COP|YINTO Z$|
|00001750| 2c 59 6f 75 20 77 69 6c | 6c 20 6e 65 65 64 20 74 |,You wil|l need t|
|00001760| 6f 20 61 64 64 20 61 20 | 22 31 22 20 69 66 20 74 |o add a |"1" if t|
|00001770| 68 65 20 6e 75 6d 62 65 | 72 20 69 73 20 6c 6f 6e |he numbe|r is lon|
|00001780| 67 20 64 69 73 74 61 6e | 63 65 2c 20 74 68 6f 75 |g distan|ce, thou|
|00001790| 67 68 2e 0d 28 54 68 65 | 20 6e 65 78 74 20 6c 69 |gh..(The| next li|
|000017a0| 6e 65 20 65 6e 74 65 72 | 73 20 79 6f 75 72 20 47 |ne enter|s your G|
|000017b0| 45 6e 69 65 20 61 63 63 | 65 73 73 20 6e 75 6d 62 |Enie acc|ess numb|
|000017c0| 65 72 20 69 6e 74 6f 20 | 74 68 65 20 76 61 72 69 |er into |the vari|
|000017d0| 61 62 6c 65 20 44 24 2e | 29 0d 51 55 45 52 59 31 |able D$.|).QUERY1|
|000017e0| 20 44 24 0d 28 54 68 65 | 20 6e 65 78 74 20 6c 69 | D$.(The| next li|
|000017f0| 6e 65 20 69 73 20 74 68 | 65 20 6f 6e 6c 79 20 6f |ne is th|e only o|
|00001800| 6e 65 20 69 6e 20 22 61 | 63 63 6f 75 6e 74 20 6e |ne in "a|ccount n|
|00001810| 75 6d 62 65 72 22 20 64 | 69 61 6c 6f 67 20 62 6f |umber" d|ialog bo|
|00001820| 78 2e 29 0d 43 4f 50 59 | 49 4e 54 4f 20 58 24 2c |x.).COPY|INTO X$,|
|00001830| 50 6c 65 61 73 65 20 74 | 79 70 65 20 69 6e 20 79 |Please t|ype in y|
|00001840| 6f 75 72 20 47 45 6e 69 | 65 20 61 63 63 6f 75 6e |our GEni|e accoun|
|00001850| 74 20 6e 75 6d 62 65 72 | 0d 28 54 68 65 20 73 65 |t number|.(The se|
|00001860| 63 6f 6e 64 20 61 6e 64 | 20 74 68 69 72 64 20 6c |cond and| third l|
|00001870| 69 6e 65 20 61 72 65 6e | 27 74 20 6e 65 65 64 65 |ine aren|'t neede|
|00001880| 64 20 69 6e 20 74 68 65 | 20 64 69 61 6c 6f 67 20 |d in the| dialog |
|00001890| 62 6f 78 20 73 6f 2c 74 | 68 65 79 27 72 65 20 65 |box so,t|hey're e|
|000018a0| 72 61 73 65 64 2e 29 0d | 45 52 41 53 45 20 59 24 |rased.).|ERASE Y$|
|000018b0| 0d 45 52 41 53 45 20 5a | 24 0d 28 54 68 65 20 6e |.ERASE Z|$.(The n|
|000018c0| 65 78 74 20 6c 69 6e 65 | 20 65 6e 74 65 72 73 20 |ext line| enters |
|000018d0| 79 6f 75 72 20 61 63 63 | 6f 75 6e 74 20 6e 75 6d |your acc|ount num|
|000018e0| 62 65 72 20 69 6e 74 6f | 20 76 61 72 69 61 62 6c |ber into| variabl|
|000018f0| 65 20 41 24 2e 29 0d 51 | 55 45 52 59 31 20 41 24 |e A$.).Q|UERY1 A$|
|00001900| 0d 28 54 68 65 20 6e 65 | 78 74 20 6c 69 6e 65 20 |.(The ne|xt line |
|00001910| 69 73 20 74 68 65 20 6f | 6e 6c 79 20 6f 6e 65 20 |is the o|nly one |
|00001920| 69 6e 20 74 68 65 20 22 | 70 61 73 73 77 6f 72 64 |in the "|password|
|00001930| 22 20 64 69 61 6c 6f 67 | 20 62 6f 78 2e 29 0d 43 |" dialog| box.).C|
|00001940| 4f 50 59 49 4e 54 4f 20 | 58 24 2c 50 6c 65 61 73 |OPYINTO |X$,Pleas|
|00001950| 65 20 74 79 70 65 20 69 | 6e 20 79 6f 75 72 20 47 |e type i|n your G|
|00001960| 45 6e 69 65 20 70 61 73 | 73 77 6f 72 64 2e 0d 28 |Enie pas|sword..(|
|00001970| 4f 6e 63 65 20 61 67 61 | 69 6e 2c 20 74 68 65 20 |Once aga|in, the |
|00001980| 73 65 63 6f 6e 64 20 26 | 20 74 68 69 72 64 20 6c |second &| third l|
|00001990| 69 6e 65 73 20 61 72 65 | 6e 27 74 20 6e 65 65 64 |ines are|n't need|
|000019a0| 65 64 20 73 6f 2c 20 74 | 68 65 79 27 72 65 20 65 |ed so, t|hey're e|
|000019b0| 72 61 73 65 64 2e 29 0d | 45 52 41 53 45 20 59 24 |rased.).|ERASE Y$|
|000019c0| 0d 45 52 41 53 45 20 5a | 24 0d 28 54 68 65 20 6e |.ERASE Z|$.(The n|
|000019d0| 65 78 74 20 6c 69 6e 65 | 20 65 6e 74 65 72 73 20 |ext line| enters |
|000019e0| 79 6f 75 72 20 70 61 73 | 73 77 6f 72 64 20 69 6e |your pas|sword in|
|000019f0| 74 6f 20 74 68 65 20 76 | 61 72 69 61 62 6c 65 20 |to the v|ariable |
|00001a00| 42 24 2e 29 0d 51 55 45 | 52 59 31 20 42 24 0d 28 |B$.).QUE|RY1 B$.(|
|00001a10| 54 68 65 20 6e 65 78 74 | 20 6c 69 6e 65 20 69 73 |The next| line is|
|00001a20| 20 74 68 65 20 64 69 61 | 6c 6f 67 20 69 6e 20 74 | the dia|log in t|
|00001a30| 68 65 20 79 65 73 2f 6e | 6f 20 22 54 6f 75 63 68 |he yes/n|o "Touch|
|00001a40| 74 6f 6e 65 22 20 64 69 | 61 6c 6f 67 20 62 6f 78 |tone" di|alog box|
|00001a50| 2e 29 0d 43 4f 50 59 49 | 4e 54 4f 20 58 24 2c 44 |.).COPYI|NTO X$,D|
|00001a60| 6f 20 79 6f 75 20 68 61 | 76 65 20 61 20 54 6f 75 |o you ha|ve a Tou|
|00001a70| 63 68 74 6f 6e 65 20 70 | 68 6f 6e 65 3f 0d 51 55 |chtone p|hone?.QU|
|00001a80| 45 52 59 34 0d 28 49 66 | 20 79 6f 75 20 61 6e 73 |ERY4.(If| you ans|
|00001a90| 77 65 72 20 22 6e 6f 22 | 20 74 6f 20 74 68 65 20 |wer "no"| to the |
|00001aa0| 54 6f 75 63 68 74 6f 6e | 65 20 71 75 65 73 74 69 |Touchton|e questi|
|00001ab0| 6f 6e 2c 20 74 68 65 20 | 70 72 6f 63 20 6a 75 6d |on, the |proc jum|
|00001ac0| 70 73 20 74 6f 20 74 68 | 65 0d 28 3a 50 75 6c 73 |ps to th|e.(:Puls|
|00001ad0| 65 20 50 68 6f 6e 65 20 | 73 65 63 74 69 6f 6e 2c |e Phone |section,|
|00001ae0| 20 69 66 20 79 6f 75 20 | 61 6e 73 77 65 72 20 22 | if you |answer "|
|00001af0| 79 65 73 22 2c 20 69 74 | 20 63 6f 70 69 65 73 20 |yes", it| copies |
|00001b00| 41 54 53 37 3d 34 30 44 | 54 20 69 6e 74 6f 0d 28 |ATS7=40D|T into.(|
|00001b10| 74 68 65 20 76 61 72 69 | 61 62 6c 65 20 45 24 2e |the vari|able E$.|
|00001b20| 29 0d 49 46 20 4e 4f 20 | 4a 55 4d 50 54 4f 20 50 |).IF NO |JUMPTO P|
|00001b30| 75 6c 73 65 20 50 68 6f | 6e 65 0d 43 4f 50 59 49 |ulse Pho|ne.COPYI|
|00001b40| 4e 54 4f 20 45 24 2c 41 | 54 53 37 3d 34 30 44 54 |NTO E$,A|TS7=40DT|
|00001b50| 0d 3a 53 74 65 70 20 54 | 77 6f 0d 28 54 68 69 73 |.:Step T|wo.(This|
|00001b60| 20 69 73 20 74 68 65 20 | 6c 69 6e 65 20 74 68 61 | is the |line tha|
|00001b70| 74 73 20 69 6e 20 74 68 | 65 20 79 65 73 2f 6e 6f |ts in th|e yes/no|
|00001b80| 20 22 62 61 75 64 22 20 | 64 69 61 6c 6f 67 20 62 | "baud" |dialog b|
|00001b90| 6f 78 2e 29 0d 43 4f 50 | 59 49 4e 54 4f 20 58 24 |ox.).COP|YINTO X$|
|00001ba0| 2c 4d 6f 64 65 6d 3a 20 | 32 34 30 30 20 62 61 75 |,Modem: |2400 bau|
|00001bb0| 64 20 28 6f 72 20 62 65 | 74 74 65 72 29 3f 0d 51 |d (or be|tter)?.Q|
|00001bc0| 55 45 52 59 34 0d 28 49 | 66 20 79 6f 75 20 61 6e |UERY4.(I|f you an|
|00001bd0| 73 77 65 72 20 22 6e 6f | 22 20 74 6f 20 74 68 65 |swer "no|" to the|
|00001be0| 20 62 61 75 64 20 71 75 | 65 73 74 69 6f 6e 2c 20 | baud qu|estion, |
|00001bf0| 74 68 65 20 70 72 6f 63 | 20 6a 75 6d 70 73 20 74 |the proc| jumps t|
|00001c00| 6f 20 74 68 65 20 3a 53 | 6c 6f 77 20 4d 6f 64 65 |o the :S|low Mode|
|00001c10| 6d 0d 28 73 65 63 74 69 | 6f 6e 2c 20 6f 74 68 65 |m.(secti|on, othe|
|00001c20| 72 77 69 73 65 20 69 74 | 20 63 6f 70 69 65 73 20 |rwise it| copies |
|00001c30| 32 34 30 30 2d 4e 2d 38 | 2d 31 2d 46 55 4c 4c 20 |2400-N-8|-1-FULL |
|00001c40| 69 6e 74 6f 20 74 68 65 | 20 76 61 72 69 61 62 6c |into the| variabl|
|00001c50| 65 20 41 34 24 2e 20 54 | 68 65 0d 28 72 65 61 73 |e A4$. T|he.(reas|
|00001c60| 6f 6e 20 77 65 20 73 65 | 74 20 74 68 65 20 64 75 |on we se|t the du|
|00001c70| 70 6c 65 78 20 74 6f 20 | 46 75 6c 6c 20 68 65 72 |plex to |Full her|
|00001c80| 65 2c 20 69 73 20 73 6f | 20 74 68 61 74 20 79 6f |e, is so| that yo|
|00001c90| 75 72 20 61 63 63 6f 75 | 6e 74 23 20 61 6e 64 0d |ur accou|nt# and.|
|00001ca0| 28 70 61 73 73 77 6f 72 | 64 20 77 6f 6e 27 74 20 |(passwor|d won't |
|00001cb0| 73 68 6f 77 20 75 70 20 | 6f 6e 20 74 68 65 20 73 |show up |on the s|
|00001cc0| 63 72 65 65 6e 20 77 68 | 65 6e 20 69 74 27 73 20 |creen wh|en it's |
|00001cd0| 74 79 70 65 64 20 74 6f | 20 47 45 6e 69 65 2e 20 |typed to| GEnie. |
|00001ce0| 54 68 65 20 64 75 70 6c | 65 78 0d 28 69 73 20 72 |The dupl|ex.(is r|
|00001cf0| 65 73 65 74 20 62 61 63 | 6b 20 74 6f 20 68 61 6c |eset bac|k to hal|
|00001d00| 66 2c 20 6c 61 74 65 72 | 20 6f 6e 20 69 6e 20 74 |f, later| on in t|
|00001d10| 68 65 20 70 72 6f 63 65 | 64 75 72 65 2e 29 0d 49 |he proce|dure.).I|
|00001d20| 46 20 4e 4f 20 4a 55 4d | 50 54 4f 20 53 6c 6f 77 |F NO JUM|PTO Slow|
|00001d30| 20 4d 6f 64 65 6d 0d 43 | 4f 50 59 49 4e 54 4f 20 | Modem.C|OPYINTO |
|00001d40| 41 34 24 2c 32 34 30 30 | 2d 4e 2d 38 2d 31 2d 46 |A4$,2400|-N-8-1-F|
|00001d50| 55 4c 4c 0d 3a 53 74 65 | 70 20 54 68 72 65 65 0d |ULL.:Ste|p Three.|
|00001d60| 28 54 68 65 20 6e 65 78 | 74 20 6c 69 6e 65 20 6a |(The nex|t line j|
|00001d70| 75 73 74 20 70 75 74 73 | 20 61 20 63 6f 6d 6d 61 |ust puts| a comma|
|00001d80| 20 69 6e 74 6f 20 74 68 | 65 20 76 61 72 69 61 62 | into th|e variab|
|00001d90| 6c 65 20 43 24 2e 29 0d | 43 4f 50 59 49 4e 54 4f |le C$.).|COPYINTO|
|00001da0| 20 43 24 2c 2c 0d 28 54 | 68 65 20 6e 65 78 74 20 | C$,,.(T|he next |
|00001db0| 6c 69 6e 65 20 63 6f 6e | 63 61 6e 74 61 74 65 73 |line con|cantates|
|00001dc0| 20 74 68 65 20 63 6f 6d | 6d 61 20 66 72 6f 6d 20 | the com|ma from |
|00001dd0| 43 24 20 69 6e 74 6f 20 | 74 68 65 20 61 63 63 6f |C$ into |the acco|
|00001de0| 75 6e 74 20 6e 75 6d 62 | 65 72 20 79 6f 75 0d 28 |unt numb|er you.(|
|00001df0| 65 6e 74 65 72 65 64 20 | 69 6e 20 74 68 65 20 41 |entered |in the A|
|00001e00| 24 2e 29 0d 43 4f 4e 43 | 41 54 20 41 24 2c 43 24 |$.).CONC|AT A$,C$|
|00001e10| 0d 28 54 68 65 20 6e 65 | 78 74 20 6c 69 6e 65 20 |.(The ne|xt line |
|00001e20| 63 6f 6e 63 61 74 61 74 | 65 73 20 74 68 65 20 70 |concatat|es the p|
|00001e30| 61 73 73 77 6f 72 64 20 | 79 6f 75 20 65 6e 74 65 |assword |you ente|
|00001e40| 72 65 64 20 69 6e 20 42 | 24 20 74 6f 20 74 68 65 |red in B|$ to the|
|00001e50| 20 61 63 63 6f 75 6e 74 | 20 6e 75 6d 62 65 72 0d | account| number.|
|00001e60| 28 61 6e 64 20 63 6f 6d | 6d 61 20 69 6e 20 41 24 |(and com|ma in A$|
|00001e70| 2e 20 54 68 65 20 41 24 | 20 69 73 20 74 68 65 6e |. The A$| is then|
|00001e80| 20 74 79 70 65 64 20 69 | 6e 20 61 74 20 74 68 65 | typed i|n at the|
|00001e90| 20 55 23 3d 20 70 72 6f | 6d 70 74 20 66 72 6f 6d | U#= pro|mpt from|
|00001ea0| 20 47 45 6e 69 65 2e 29 | 0d 43 4f 4e 43 41 54 20 | GEnie.)|.CONCAT |
|00001eb0| 41 24 2c 42 24 0d 28 54 | 68 65 20 6e 65 78 74 20 |A$,B$.(T|he next |
|00001ec0| 6c 69 6e 65 73 20 61 72 | 65 20 74 68 65 20 64 61 |lines ar|e the da|
|00001ed0| 74 61 20 63 6f 6e 74 61 | 69 6e 65 64 20 69 6e 20 |ta conta|ined in |
|00001ee0| 74 68 65 20 64 69 61 6c | 6f 67 20 62 6f 78 20 61 |the dial|og box a|
|00001ef0| 64 76 69 73 69 6e 67 20 | 79 6f 75 20 74 68 61 74 |dvising |you that|
|00001f00| 0d 28 79 6f 75 20 77 69 | 6c 6c 20 6e 65 65 64 20 |.(you wi|ll need |
|00001f10| 74 6f 20 73 65 6c 65 63 | 74 20 61 20 64 65 73 74 |to selec|t a dest|
|00001f20| 69 6e 61 74 69 6f 6e 20 | 66 6f 6c 64 65 72 20 66 |ination |folder f|
|00001f30| 6f 72 20 79 6f 75 72 20 | 42 42 20 61 72 63 68 69 |or your |BB archi|
|00001f40| 76 65 73 2e 29 0d 43 4f | 50 59 49 4e 54 4f 20 58 |ves.).CO|PYINTO X|
|00001f50| 24 2c 59 6f 75 20 6e 65 | 65 64 20 74 6f 20 73 65 |$,You ne|ed to se|
|00001f60| 6c 65 63 74 20 61 20 64 | 65 73 74 69 6e 61 74 69 |lect a d|estinati|
|00001f70| 6f 6e 20 66 6f 6c 64 65 | 72 20 66 6f 72 20 79 6f |on folde|r for yo|
|00001f80| 75 72 20 6d 65 73 73 61 | 67 65 73 2e 0d 43 4f 50 |ur messa|ges..COP|
|00001f90| 59 49 4e 54 4f 20 59 24 | 2c 54 68 65 20 66 6f 6c |YINTO Y$|,The fol|
|00001fa0| 6c 6f 77 69 6e 67 20 64 | 69 61 6c 6f 67 20 62 6f |lowing d|ialog bo|
|00001fb0| 78 20 77 69 6c 6c 20 61 | 6c 6c 6f 77 20 79 6f 75 |x will a|llow you|
|00001fc0| 20 74 6f 20 64 6f 20 74 | 68 61 74 2e 0d 43 4f 50 | to do t|hat..COP|
|00001fd0| 59 49 4e 54 4f 20 5a 24 | 2c 49 74 20 77 6f 72 6b |YINTO Z$|,It work|
|00001fe0| 73 20 6c 69 6b 65 20 61 | 20 22 53 61 76 65 22 20 |s like a| "Save" |
|00001ff0| 64 69 61 6c 6f 67 2e 0d | 28 54 68 65 20 6e 65 78 |dialog..|(The nex|
|00002000| 74 20 6c 69 6e 65 20 62 | 72 69 6e 67 73 20 75 70 |t line b|rings up|
|00002010| 20 74 68 65 20 64 69 61 | 6c 6f 67 20 62 6f 78 2e | the dia|log box.|
|00002020| 29 0d 51 55 45 52 59 32 | 0d 28 54 68 65 20 6e 65 |).QUERY2|.(The ne|
|00002030| 78 74 20 6c 69 6e 65 20 | 73 65 74 73 20 75 70 20 |xt line |sets up |
|00002040| 61 20 6c 61 62 65 6c 20 | 73 6f 20 74 68 61 74 20 |a label |so that |
|00002050| 79 6f 75 20 63 61 6e 20 | 72 65 74 75 72 6e 20 68 |you can |return h|
|00002060| 65 72 65 20 69 66 20 79 | 6f 75 20 63 6c 69 63 6b |ere if y|ou click|
|00002070| 20 74 68 65 0d 28 22 59 | 65 73 22 20 62 75 74 74 | the.("Y|es" butt|
|00002080| 6f 6e 20 69 6e 20 74 68 | 65 20 22 53 6f 72 72 79 |on in th|e "Sorry|
|00002090| 22 20 64 69 61 6c 6f 67 | 20 62 6f 78 2e 29 0d 3a |" dialog| box.).:|
|000020a0| 47 65 74 0d 28 54 68 65 | 20 6e 65 78 74 20 6c 69 |Get.(The| next li|
|000020b0| 6e 65 73 20 62 72 69 6e | 67 20 75 70 20 74 68 65 |nes brin|g up the|
|000020c0| 20 64 69 61 6c 6f 67 20 | 62 6f 78 20 74 68 61 74 | dialog |box that|
|000020d0| 20 61 6c 6c 6f 77 73 20 | 79 6f 75 20 74 6f 20 73 | allows |you to s|
|000020e0| 65 6c 65 63 74 20 74 68 | 65 20 64 65 73 74 69 6e |elect th|e destin|
|000020f0| 61 2d 0d 28 74 69 6f 6e | 20 66 6f 6c 64 65 72 20 |a-.(tion| folder |
|00002100| 66 6f 72 20 79 6f 75 72 | 20 42 42 20 6d 65 73 73 |for your| BB mess|
|00002110| 61 67 65 73 20 61 6e 64 | 20 70 75 74 73 20 74 68 |ages and| puts th|
|00002120| 65 20 66 75 6c 6c 20 70 | 61 74 68 6e 61 6d 65 20 |e full p|athname |
|00002130| 69 6e 74 6f 20 74 68 65 | 20 76 61 72 69 61 62 6c |into the| variabl|
|00002140| 65 0d 28 46 24 2e 20 49 | 66 20 79 6f 75 20 63 6c |e.(F$. I|f you cl|
|00002150| 69 63 6b 20 6f 6e 20 74 | 68 65 20 22 43 61 6e 63 |ick on t|he "Canc|
|00002160| 65 6c 22 20 62 75 74 74 | 6f 6e 2c 20 74 68 65 20 |el" butt|on, the |
|00002170| 70 72 6f 63 20 6d 6f 76 | 65 73 20 74 6f 20 74 68 |proc mov|es to th|
|00002180| 65 20 22 53 6f 72 72 79 | 22 0d 28 73 65 63 74 69 |e "Sorry|".(secti|
|00002190| 6f 6e 20 6f 66 20 74 68 | 65 20 70 72 6f 63 2e 29 |on of th|e proc.)|
|000021a0| 0d 47 45 54 56 4f 4c 20 | 46 24 0d 49 46 20 4e 4f |.GETVOL |F$.IF NO|
|000021b0| 20 4a 55 4d 50 54 4f 20 | 53 6f 72 72 79 0d 28 54 | JUMPTO |Sorry.(T|
|000021c0| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 69 73 20 |he next |line is |
|000021d0| 77 68 61 74 20 73 61 76 | 65 73 20 74 68 65 20 66 |what sav|es the f|
|000021e0| 69 6c 65 3a 20 22 7e 57 | 4b 20 56 41 52 49 22 20 |ile: "~W|K VARI" |
|000021f0| 69 6e 74 6f 20 74 68 65 | 20 57 68 69 74 65 20 4b |into the| White K|
|00002200| 6e 69 67 68 74 20 66 6f | 6c 64 65 72 0d 28 6f 6e |night fo|lder.(on|
|00002210| 20 79 6f 75 72 20 68 61 | 72 64 20 64 72 69 76 65 | your ha|rd drive|
|00002220| 2e 29 0d 53 41 56 45 56 | 41 52 20 3a 7e 57 4b 20 |.).SAVEV|AR :~WK |
|00002230| 56 41 52 49 0d 28 54 68 | 65 20 6e 65 78 74 20 6c |VARI.(Th|e next l|
|00002240| 69 6e 65 20 69 73 20 74 | 68 65 20 74 65 78 74 20 |ine is t|he text |
|00002250| 74 68 61 74 27 73 20 69 | 6e 20 74 68 65 20 6c 61 |that's i|n the la|
|00002260| 73 74 20 64 69 61 6c 6f | 67 20 62 6f 78 2e 29 0d |st dialo|g box.).|
|00002270| 43 4f 50 59 49 4e 54 4f | 20 58 24 2c 44 6f 20 79 |COPYINTO| X$,Do y|
|00002280| 6f 75 20 77 61 6e 74 20 | 74 6f 20 6c 6f 67 20 6f |ou want |to log o|
|00002290| 6e 20 6e 6f 77 3f 0d 51 | 55 45 52 59 34 0d 28 49 |n now?.Q|UERY4.(I|
|000022a0| 66 20 79 6f 75 20 61 6e | 73 77 65 72 20 6e 6f 20 |f you an|swer no |
|000022b0| 74 6f 20 74 68 65 20 22 | 4c 6f 67 20 6f 6e 22 20 |to the "|Log on" |
|000022c0| 71 75 65 73 74 69 6f 6e | 2c 20 74 68 65 20 70 72 |question|, the pr|
|000022d0| 6f 63 65 64 75 72 65 20 | 65 6e 64 73 20 68 65 72 |ocedure |ends her|
|000022e0| 65 2c 20 6f 74 68 65 72 | 77 69 73 65 2c 0d 28 69 |e, other|wise,.(i|
|000022f0| 74 20 6a 75 6d 70 73 20 | 74 6f 20 74 68 65 20 4c |t jumps |to the L|
|00002300| 6f 67 6f 6e 20 73 65 63 | 74 69 6f 6e 20 61 6e 64 |ogon sec|tion and|
|00002310| 20 6c 6f 67 73 20 79 6f | 75 20 6f 6e 74 6f 20 47 | logs yo|u onto G|
|00002320| 45 6e 69 65 2e 29 0d 49 | 46 20 4e 4f 20 45 4e 44 |Enie.).I|F NO END|
|00002330| 0d 4a 55 4d 50 54 4f 20 | 4c 6f 67 6f 6e 0d 45 4e |.JUMPTO |Logon.EN|
|00002340| 44 0d 28 54 68 69 73 20 | 6e 65 78 74 20 73 65 63 |D.(This |next sec|
|00002350| 74 69 6f 6e 20 28 75 70 | 20 74 6f 20 74 68 65 20 |tion (up| to the |
|00002360| 22 45 4e 44 22 29 20 69 | 73 20 77 68 65 72 65 20 |"END") i|s where |
|00002370| 74 68 65 20 70 72 6f 63 | 20 6a 75 6d 70 73 20 74 |the proc| jumps t|
|00002380| 6f 20 69 66 20 79 6f 75 | 20 61 6e 73 77 65 72 0d |o if you| answer.|
|00002390| 28 22 6e 6f 22 20 74 6f | 20 74 68 65 20 22 54 6f |("no" to| the "To|
|000023a0| 75 63 68 74 6f 6e 65 22 | 20 71 75 65 73 74 69 6f |uchtone"| questio|
|000023b0| 6e 2e 29 0d 3a 50 75 6c | 73 65 20 50 68 6f 6e 65 |n.).:Pul|se Phone|
|000023c0| 0d 28 54 68 65 20 6e 65 | 78 74 20 6c 69 6e 65 20 |.(The ne|xt line |
|000023d0| 63 6f 70 69 65 73 20 74 | 68 65 20 73 61 6d 65 20 |copies t|he same |
|000023e0| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 69 6e 74 6f |informat|ion into|
|000023f0| 20 74 68 65 20 76 61 72 | 69 61 62 6c 65 20 45 24 | the var|iable E$|
|00002400| 20 61 73 20 74 68 65 20 | 72 65 67 75 6c 61 72 0d | as the |regular.|
|00002410| 28 70 61 72 74 20 6f 66 | 20 74 68 65 20 74 68 65 |(part of| the the|
|00002420| 20 22 53 65 74 75 70 22 | 20 73 65 63 74 69 6f 6e | "Setup"| section|
|00002430| 20 64 69 64 20 61 62 6f | 76 65 20 77 69 74 68 2c | did abo|ve with,|
|00002440| 20 6f 6e 65 20 65 78 63 | 65 70 74 69 6f 6e 2e 20 | one exc|eption. |
|00002450| 54 68 65 20 22 54 22 20 | 61 74 0d 28 74 68 65 20 |The "T" |at.(the |
|00002460| 65 6e 64 20 6f 66 20 74 | 68 65 20 74 65 78 74 20 |end of t|he text |
|00002470| 73 74 72 69 6e 67 20 69 | 73 20 72 65 70 6c 61 63 |string i|s replac|
|00002480| 65 64 20 77 69 74 68 20 | 61 20 22 50 22 2e 20 28 |ed with |a "P". (|
|00002490| 59 65 70 2c 20 54 3d 54 | 6f 75 63 68 74 6f 6e 65 |Yep, T=T|ouchtone|
|000024a0| 20 70 68 6f 6e 65 20 61 | 6e 64 0d 28 50 3d 50 75 | phone a|nd.(P=Pu|
|000024b0| 6c 73 65 20 74 79 70 65 | 20 70 68 6f 6e 65 2e 29 |lse type| phone.)|
|000024c0| 29 0d 43 4f 50 59 49 4e | 54 4f 20 45 24 2c 41 54 |).COPYIN|TO E$,AT|
|000024d0| 53 37 3d 34 30 44 50 0d | 28 54 68 65 20 6e 65 78 |S7=40DP.|(The nex|
|000024e0| 74 20 6c 69 6e 65 20 74 | 61 6b 65 73 20 79 6f 75 |t line t|akes you|
|000024f0| 20 75 70 20 74 6f 20 74 | 68 65 20 22 6d 6f 64 65 | up to t|he "mode|
|00002500| 6d 22 20 64 69 61 6c 6f | 67 20 62 6f 78 2e 29 0d |m" dialo|g box.).|
|00002510| 4a 55 4d 50 54 4f 20 53 | 74 65 70 20 54 77 6f 0d |JUMPTO S|tep Two.|
|00002520| 45 4e 44 0d 28 54 68 65 | 20 6e 65 78 74 20 73 65 |END.(The| next se|
|00002530| 63 74 69 6f 6e 20 28 75 | 70 20 74 6f 20 74 68 65 |ction (u|p to the|
|00002540| 20 22 45 4e 44 22 29 20 | 69 73 20 77 68 65 72 65 | "END") |is where|
|00002550| 20 74 68 65 20 70 72 6f | 63 20 6a 75 6d 70 73 20 | the pro|c jumps |
|00002560| 74 6f 20 69 66 20 79 6f | 75 20 61 6e 73 77 65 72 |to if yo|u answer|
|00002570| 0d 28 22 6e 6f 22 20 74 | 6f 20 74 68 65 20 22 6d |.("no" t|o the "m|
|00002580| 6f 64 65 6d 22 20 71 75 | 65 73 74 69 6f 6e 2e 29 |odem" qu|estion.)|
|00002590| 0d 3a 53 6c 6f 77 20 4d | 6f 64 65 6d 0d 28 54 68 |.:Slow M|odem.(Th|
|000025a0| 65 20 6e 65 78 74 20 6c | 69 6e 65 20 63 6f 70 69 |e next l|ine copi|
|000025b0| 65 73 20 22 31 32 30 30 | 2d 4e 2d 38 2d 31 2d 46 |es "1200|-N-8-1-F|
|000025c0| 55 4c 4c 22 20 69 6e 74 | 6f 20 74 68 65 20 76 61 |ULL" int|o the va|
|000025d0| 72 69 61 62 6c 65 20 41 | 34 24 20 69 6e 73 74 65 |riable A|4$ inste|
|000025e0| 61 64 20 6f 66 20 74 68 | 65 0d 28 32 34 30 30 2d |ad of th|e.(2400-|
|000025f0| 4e 2d 38 2d 31 2d 46 55 | 4c 4c 20 74 68 61 74 20 |N-8-1-FU|LL that |
|00002600| 69 73 20 63 6f 70 69 65 | 64 20 69 6e 74 6f 20 74 |is copie|d into t|
|00002610| 68 65 20 73 61 6d 65 20 | 76 61 72 69 61 62 6c 65 |he same |variable|
|00002620| 20 69 6e 20 74 68 65 20 | 6e 6f 72 6d 61 6c 20 70 | in the |normal p|
|00002630| 61 72 74 20 6f 66 0d 28 | 74 68 65 20 22 53 65 74 |art of.(|the "Set|
|00002640| 75 70 22 20 73 65 63 74 | 69 6f 6e 2e 20 5b 53 65 |up" sect|ion. [Se|
|00002650| 65 20 6e 6f 74 65 20 61 | 62 6f 76 65 20 66 6f 72 |e note a|bove for|
|00002660| 20 65 78 70 61 6e 61 74 | 69 6f 6e 20 6f 66 20 77 | expanat|ion of w|
|00002670| 68 79 20 46 75 6c 6c 20 | 69 73 20 75 73 65 64 2e |hy Full |is used.|
|00002680| 5d 29 0d 43 4f 50 59 49 | 4e 54 4f 20 41 34 24 2c |]).COPYI|NTO A4$,|
|00002690| 31 32 30 30 2d 4e 2d 38 | 2d 31 2d 46 55 4c 4c 0d |1200-N-8|-1-FULL.|
|000026a0| 28 54 68 65 20 6e 65 78 | 74 20 6c 69 6e 65 20 6a |(The nex|t line j|
|000026b0| 75 6d 70 73 20 79 6f 75 | 20 62 61 63 6b 20 74 6f |umps you| back to|
|000026c0| 20 74 68 65 20 22 53 65 | 74 75 70 22 20 73 65 63 | the "Se|tup" sec|
|000026d0| 74 69 6f 6e 20 73 6f 20 | 74 68 61 74 20 74 68 65 |tion so |that the|
|000026e0| 20 73 65 74 75 70 20 63 | 61 6e 0d 28 62 65 20 66 | setup c|an.(be f|
|000026f0| 69 6e 69 73 68 65 64 2e | 29 0d 4a 55 4d 50 54 4f |inished.|).JUMPTO|
|00002700| 20 53 74 65 70 20 54 68 | 72 65 65 0d 45 4e 44 0d | Step Th|ree.END.|
|00002710| 28 54 68 65 20 6e 65 78 | 74 20 6c 69 6e 65 20 73 |(The nex|t line s|
|00002720| 74 61 72 74 20 74 68 65 | 20 70 72 6f 63 20 73 65 |tart the| proc se|
|00002730| 63 74 69 6f 6e 20 63 61 | 6c 6c 65 64 3a 20 22 53 |ction ca|lled: "S|
|00002740| 6f 72 72 79 22 2e 29 0d | 3a 53 6f 72 72 79 0d 28 |orry".).|:Sorry.(|
|00002750| 54 68 65 20 6e 65 78 74 | 20 6c 69 6e 65 73 20 63 |The next| lines c|
|00002760| 6f 6e 74 61 69 6e 20 74 | 68 65 20 64 69 61 6c 6f |ontain t|he dialo|
|00002770| 67 20 69 6e 20 74 68 65 | 20 22 53 6f 72 72 79 22 |g in the| "Sorry"|
|00002780| 20 64 69 61 6c 6f 67 20 | 62 6f 78 2e 20 54 68 65 | dialog |box. The|
|00002790| 20 74 68 69 72 64 20 6c | 69 6e 65 0d 28 69 73 6e | third l|ine.(isn|
|000027a0| 27 74 20 75 73 65 64 20 | 73 6f 2c 20 69 74 27 73 |'t used |so, it's|
|000027b0| 20 65 72 61 73 65 64 2e | 29 0d 43 4f 50 59 49 4e | erased.|).COPYIN|
|000027c0| 54 4f 20 58 24 2c 53 4f | 52 52 59 21 20 59 6f 75 |TO X$,SO|RRY! You|
|000027d0| 20 4d 55 53 54 20 73 65 | 6c 65 63 74 20 61 20 64 | MUST se|lect a d|
|000027e0| 65 73 74 69 6e 61 74 69 | 6f 6e 20 66 6f 6c 64 65 |estinati|on folde|
|000027f0| 72 20 66 6f 72 20 74 68 | 69 73 20 70 72 6f 63 20 |r for th|is proc |
|00002800| 74 6f 20 77 6f 72 6b 2e | 0d 43 4f 50 59 49 4e 54 |to work.|.COPYINT|
|00002810| 4f 20 59 24 2c 57 6f 75 | 6c 64 20 79 6f 75 20 6c |O Y$,Wou|ld you l|
|00002820| 69 6b 65 20 74 6f 20 74 | 72 79 20 61 67 61 69 6e |ike to t|ry again|
|00002830| 3f 0d 45 52 41 53 45 20 | 5a 24 0d 28 54 68 65 20 |?.ERASE |Z$.(The |
|00002840| 6e 65 78 74 20 6c 69 6e | 65 20 62 72 69 6e 67 73 |next lin|e brings|
|00002850| 20 75 70 20 74 68 65 20 | 64 69 61 6c 6f 67 20 62 | up the |dialog b|
|00002860| 6f 78 2e 29 0d 51 55 45 | 52 59 33 0d 28 49 66 20 |ox.).QUE|RY3.(If |
|00002870| 74 68 65 20 75 73 65 72 | 20 63 6c 69 63 6b 73 20 |the user| clicks |
|00002880| 6f 6e 20 74 68 65 20 22 | 59 65 73 22 20 62 75 74 |on the "|Yes" but|
|00002890| 74 6f 6e 2c 20 68 65 27 | 73 20 74 61 6b 65 6e 20 |ton, he'|s taken |
|000028a0| 62 61 63 6b 20 74 6f 20 | 74 68 65 20 22 47 45 54 |back to |the "GET|
|000028b0| 56 4f 4c 22 0d 28 64 69 | 61 6c 6f 67 20 62 6f 78 |VOL".(di|alog box|
|000028c0| 2e 20 49 66 20 74 68 65 | 79 20 63 6c 69 63 6b 20 |. If the|y click |
|000028d0| 6f 6e 20 74 68 65 20 22 | 4e 6f 22 20 62 75 74 74 |on the "|No" butt|
|000028e0| 6f 6e 2c 20 74 68 65 20 | 70 72 6f 63 64 75 72 65 |on, the |procdure|
|000028f0| 20 65 6e 64 73 2e 29 0d | 49 46 20 59 45 53 20 4a | ends.).|IF YES J|
|00002900| 55 4d 50 54 4f 20 47 65 | 74 0d 45 4e 44 0d 28 54 |UMPTO Ge|t.END.(T|
|00002910| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 73 74 61 |he next |line sta|
|00002920| 72 74 73 20 74 68 65 20 | 22 4f 6f 70 73 22 20 73 |rts the |"Oops" s|
|00002930| 65 63 74 69 6f 6e 2e 20 | 59 6f 75 20 6a 75 6d 70 |ection. |You jump|
|00002940| 20 74 6f 20 68 65 72 65 | 20 69 66 20 57 68 69 74 | to here| if Whit|
|00002950| 65 20 4b 6e 69 67 68 74 | 0d 28 63 61 6e 27 74 20 |e Knight|.(can't |
|00002960| 66 69 6e 64 20 79 6f 75 | 72 20 64 65 73 74 69 6e |find you|r destin|
|00002970| 61 74 69 6f 6e 20 66 6f | 6c 64 65 72 20 61 74 20 |ation fo|lder at |
|00002980| 74 68 65 20 73 74 61 72 | 74 20 6f 66 20 74 68 65 |the star|t of the|
|00002990| 20 22 41 72 63 68 69 76 | 65 20 4d 65 73 73 61 67 | "Archiv|e Messag|
|000029a0| 65 73 22 0d 28 73 65 63 | 74 69 6f 6e 2e 29 0d 3a |es".(sec|tion.).:|
|000029b0| 4f 6f 70 73 0d 28 54 68 | 65 20 6e 65 78 74 20 74 |Oops.(Th|e next t|
|000029c0| 68 72 65 65 20 6c 69 6e | 65 73 20 63 6f 6e 74 61 |hree lin|es conta|
|000029d0| 69 6e 20 74 68 65 20 64 | 69 61 6c 6f 67 20 69 6e |in the d|ialog in|
|000029e0| 20 74 68 65 20 22 43 61 | 6e 74 20 66 69 6e 64 22 | the "Ca|nt find"|
|000029f0| 20 64 69 61 6c 6f 67 20 | 62 6f 78 2e 29 0d 43 4f | dialog |box.).CO|
|00002a00| 50 59 49 4e 54 4f 20 58 | 24 2c 57 68 69 74 65 20 |PYINTO X|$,White |
|00002a10| 4b 6e 69 67 68 74 20 63 | 61 6e 27 74 20 66 69 6e |Knight c|an't fin|
|00002a20| 64 20 74 68 65 20 64 65 | 73 74 69 6e 61 74 69 6f |d the de|stinatio|
|00002a30| 6e 20 66 6f 6c 64 65 72 | 20 66 6f 72 20 79 6f 75 |n folder| for you|
|00002a40| 72 20 6d 65 73 73 61 67 | 65 73 2e 0d 43 4f 50 59 |r messag|es..COPY|
|00002a50| 49 4e 54 4f 20 59 24 2c | 59 6f 75 20 77 69 6c 6c |INTO Y$,|You will|
|00002a60| 20 68 61 76 65 20 74 6f | 20 64 6f 20 74 68 65 20 | have to| do the |
|00002a70| 53 65 74 75 70 20 61 67 | 61 69 6e 20 66 6f 72 20 |Setup ag|ain for |
|00002a80| 74 68 65 20 6d 65 73 73 | 61 67 65 20 72 65 61 64 |the mess|age read|
|00002a90| 65 72 20 70 61 72 74 20 | 6f 66 0d 43 4f 50 59 49 |er part |of.COPYI|
|00002aa0| 4e 54 4f 20 5a 24 2c 74 | 68 69 73 20 70 72 6f 63 |NTO Z$,t|his proc|
|00002ab0| 65 64 75 72 65 20 74 6f | 20 77 6f 72 6b 2e 20 44 |edure to| work. D|
|00002ac0| 6f 20 79 6f 75 20 77 61 | 6e 74 20 74 6f 20 64 6f |o you wa|nt to do|
|00002ad0| 20 74 68 69 73 20 6e 6f | 77 3f 0d 28 54 68 65 20 | this no|w?.(The |
|00002ae0| 6e 65 78 74 20 6c 69 6e | 65 20 62 72 69 6e 67 73 |next lin|e brings|
|00002af0| 20 75 70 20 74 68 65 20 | 64 69 61 6c 6f 67 20 62 | up the |dialog b|
|00002b00| 6f 78 2e 29 0d 51 55 45 | 52 59 33 0d 28 49 66 20 |ox.).QUE|RY3.(If |
|00002b10| 74 68 65 20 75 73 65 72 | 20 63 6c 69 63 6b 73 20 |the user| clicks |
|00002b20| 6f 6e 20 74 68 65 20 22 | 4e 6f 22 20 62 75 74 74 |on the "|No" butt|
|00002b30| 6f 6e 2c 20 74 68 65 20 | 70 72 6f 63 65 64 75 72 |on, the |procedur|
|00002b40| 65 20 6d 6f 76 65 73 20 | 74 6f 20 74 68 65 20 22 |e moves |to the "|
|00002b50| 47 65 74 6f 75 74 20 31 | 22 0d 28 73 65 63 74 69 |Getout 1|".(secti|
|00002b60| 6f 6e 2e 29 0d 49 46 20 | 4e 4f 20 4a 55 4d 50 54 |on.).IF |NO JUMPT|
|00002b70| 4f 20 47 65 74 6f 75 74 | 20 31 0d 28 49 66 20 74 |O Getout| 1.(If t|
|00002b80| 68 65 20 75 73 65 72 20 | 63 6c 69 63 6b 73 20 6f |he user |clicks o|
|00002b90| 6e 20 74 68 65 20 22 59 | 65 73 22 20 62 75 74 74 |n the "Y|es" butt|
|00002ba0| 6f 6e 2c 20 74 68 65 20 | 70 72 6f 63 65 64 75 72 |on, the |procedur|
|00002bb0| 65 20 6d 6f 76 65 73 20 | 74 6f 20 74 68 65 20 22 |e moves |to the "|
|00002bc0| 53 65 74 75 70 22 0d 28 | 73 65 63 74 69 6f 6e 2e |Setup".(|section.|
|00002bd0| 29 0d 4a 55 4d 50 54 4f | 20 53 65 74 75 70 0d 45 |).JUMPTO| Setup.E|
|00002be0| 4e 44 0d 28 54 68 65 20 | 6e 65 78 74 20 6c 69 6e |ND.(The |next lin|
|00002bf0| 65 20 69 73 20 74 68 65 | 20 73 74 61 72 74 20 6f |e is the| start o|
|00002c00| 66 20 74 68 65 20 22 47 | 65 74 6f 75 74 20 31 20 |f the "G|etout 1 |
|00002c10| 73 65 63 74 69 6f 6e 2e | 20 54 68 65 20 70 72 6f |section.| The pro|
|00002c20| 63 65 64 75 72 65 20 6d | 6f 76 65 73 20 74 6f 0d |cedure m|oves to.|
|00002c30| 28 68 65 72 65 20 61 66 | 74 65 72 20 74 68 65 20 |(here af|ter the |
|00002c40| 75 73 65 72 20 68 61 73 | 20 63 6c 69 63 6b 65 64 |user has| clicked|
|00002c50| 20 74 68 65 20 22 4e 6f | 22 20 62 75 74 74 6f 6e | the "No|" button|
|00002c60| 20 69 6e 20 74 68 65 20 | 22 4f 6f 70 73 22 20 73 | in the |"Oops" s|
|00002c70| 65 63 74 69 6f 6e 2e 20 | 53 69 6e 63 65 0d 28 57 |ection. |Since.(W|
|00002c80| 68 69 74 65 20 4b 6e 69 | 67 68 74 20 63 61 6e 27 |hite Kni|ght can'|
|00002c90| 74 20 66 69 6e 64 20 74 | 68 65 20 64 65 73 74 69 |t find t|he desti|
|00002ca0| 6e 61 74 69 6f 6e 20 66 | 6f 6c 64 65 72 3b 20 77 |nation f|older; w|
|00002cb0| 68 69 63 68 2c 20 74 68 | 65 20 6d 65 73 73 61 67 |hich, th|e messag|
|00002cc0| 65 20 72 65 61 64 69 6e | 67 0d 28 70 61 72 74 20 |e readin|g.(part |
|00002cd0| 6f 66 20 74 68 69 73 20 | 70 72 6f 63 65 64 75 72 |of this |procedur|
|00002ce0| 65 20 6e 65 65 64 73 20 | 74 6f 20 72 75 6e 2c 20 |e needs |to run, |
|00002cf0| 61 6e 64 2c 20 73 69 6e | 63 65 20 74 68 65 20 75 |and, sin|ce the u|
|00002d00| 73 65 72 20 68 61 73 20 | 63 68 6f 73 65 6e 20 6e |ser has |chosen n|
|00002d10| 6f 74 20 74 6f 0d 28 64 | 6f 20 61 20 73 65 74 75 |ot to.(d|o a setu|
|00002d20| 70 20 61 74 20 74 68 69 | 73 20 74 69 6d 65 2c 20 |p at thi|s time, |
|00002d30| 74 68 65 20 70 72 6f 63 | 65 64 75 72 65 20 62 72 |the proc|edure br|
|00002d40| 69 6e 67 73 20 75 70 20 | 61 20 64 69 61 6c 6f 67 |ings up |a dialog|
|00002d50| 20 62 6f 78 20 6c 65 74 | 74 69 6e 67 20 74 68 65 | box let|ting the|
|00002d60| 6d 0d 28 6b 6e 6f 77 20 | 74 68 61 74 20 74 68 65 |m.(know |that the|
|00002d70| 20 70 72 6f 63 65 64 75 | 72 65 20 77 69 6c 6c 20 | procedu|re will |
|00002d80| 65 6e 64 2e 29 0d 3a 47 | 65 74 6f 75 74 20 31 0d |end.).:G|etout 1.|
|00002d90| 28 54 68 65 20 6e 65 78 | 74 20 74 77 6f 20 6c 69 |(The nex|t two li|
|00002da0| 6e 65 73 20 63 6f 6e 74 | 61 69 6e 20 74 68 65 20 |nes cont|ain the |
|00002db0| 64 69 61 6c 6f 67 20 69 | 6e 20 74 68 65 3a 20 22 |dialog i|n the: "|
|00002dc0| 4f 4b 2e 2e 2e 29 20 64 | 69 61 6c 6f 67 20 62 6f |OK...) d|ialog bo|
|00002dd0| 78 2e 20 54 68 65 20 74 | 68 69 72 64 0d 28 6c 69 |x. The t|hird.(li|
|00002de0| 6e 65 20 69 73 6e 27 74 | 20 6e 65 65 64 65 64 20 |ne isn't| needed |
|00002df0| 73 6f 2c 20 69 74 27 73 | 20 65 72 61 73 65 64 2e |so, it's| erased.|
|00002e00| 29 0d 43 4f 50 59 49 4e | 54 4f 20 58 24 2c 4f 4b |).COPYIN|TO X$,OK|
|00002e10| 2c 20 53 69 6e 63 65 20 | 74 68 65 20 6d 65 73 73 |, Since |the mess|
|00002e20| 61 67 65 20 72 65 61 64 | 69 6e 67 20 70 61 72 74 |age read|ing part|
|00002e30| 20 6f 66 20 74 68 69 73 | 20 70 72 6f 63 65 64 75 | of this| procedu|
|00002e40| 72 65 20 77 6f 6e 27 74 | 20 0d 43 4f 50 59 49 4e |re won't| .COPYIN|
|00002e50| 54 4f 20 59 24 2c 77 6f | 72 6b 20 77 69 74 68 6f |TO Y$,wo|rk witho|
|00002e60| 75 74 20 61 20 64 65 73 | 74 69 6e 61 74 69 6f 6e |ut a des|tination|
|00002e70| 20 66 6f 6c 64 65 72 2c | 20 74 68 69 73 20 70 72 | folder,| this pr|
|00002e80| 6f 63 65 64 75 72 65 20 | 77 69 6c 6c 20 65 6e 64 |ocedure |will end|
|00002e90| 2e 20 0d 45 52 41 53 45 | 20 5a 24 0d 28 54 68 65 |. .ERASE| Z$.(The|
|00002ea0| 20 6e 65 78 74 20 6c 69 | 6e 65 20 62 72 69 6e 67 | next li|ne bring|
|00002eb0| 73 20 75 70 20 74 68 65 | 20 64 69 61 6c 6f 67 20 |s up the| dialog |
|00002ec0| 62 6f 78 2e 29 0d 51 55 | 45 52 59 32 0d 45 4e 44 |box.).QU|ERY2.END|
|00002ed0| 0d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f00| 00 00 01 00 00 00 01 e4 | 00 00 00 e4 00 00 00 5a |........|.......Z|
|00002f10| 73 69 74 35 00 00 00 01 | 00 00 00 08 20 2d 00 00 |sit5....|.... -..|
|00002f20| 00 66 00 01 41 4b 53 49 | 54 44 53 49 54 32 53 49 |.f..AKSI|TDSIT2SI|
|00002f30| 11 4c 6f 67 6f 6e 2f 4d | 73 67 52 65 61 64 65 72 |.Logon/M|sgReader|
|00002f40| 2d 58 02 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |-X......|........|
|00002f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f70| 00 00 a5 02 ac da 00 00 | 00 00 00 00 02 3e 00 01 |........|.....>..|
|00002f80| a8 a7 48 6e 00 00 00 00 | 00 00 00 66 00 01 00 3f |..Hn....|...f...?|
|00002f90| a7 00 00 40 ff c4 ff 98 | 01 1a 01 98 00 00 00 00 |...@....|........|
|00002fa0| 00 c8 01 30 00 0f a8 0e | 00 0f a7 d2 00 00 0c 53 |...0....|.......S|
|00002fb0| 74 65 77 27 73 20 44 72 | 69 76 65 63 65 73 00 02 |tew's Dr|iveces..|
|00002fc0| 36 a6 03 4e 65 77 04 4e | 00 00 00 5d ff ff 00 00 |6..New.N|...]....|
|00002fd0| 17 ae 0b 44 69 61 6c 6f | 67 20 54 65 73 74 00 00 |...Dialo|g Test..|
|00002fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ff0| 00 00 00 00 01 00 00 00 | 0e f2 00 00 0d f2 00 00 |........|........|
|00003000| 00 00 00 40 00 09 06 4d | 6f 6e 61 63 6f 00 00 00 |...@...M|onaco...|
|00003010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003040| 00 00 00 00 00 00 00 04 | 00 06 00 0f 00 00 00 94 |........|........|
|00003050| 00 00 00 43 00 00 0b dd | 00 00 0b dd 00 00 00 01 |...C....|........|
|00003060| 00 00 00 46 00 00 ff ff | 00 00 00 00 ff ff ff ff |...F....|........|
|00003070| ff ff ff ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003080| ff ff ff ff ff ff ff ff | ff ff ff ff 00 00 00 00 |........|........|
|00003090| 00 00 00 00 00 00 00 00 | ff ff ff ff ff ff 00 00 |........|........|
|000030a0| 00 00 00 00 00 00 00 00 | 00 00 00 29 00 03 01 53 |........|...)...S|
|000030b0| 01 fd 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000030c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000030d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000030e0| 00 00 00 00 00 00 01 00 | 00 00 01 e4 00 00 00 e4 |........|........|
|000030f0| 00 00 00 5a 00 0e d3 18 | 01 7a 00 00 00 1c 00 5a |...Z....|.z.....Z|
|00003100| 00 02 45 46 4e 54 00 00 | 00 1a 45 54 41 42 00 00 |..EFNT..|..ETAB..|
|00003110| 00 26 45 50 4f 53 00 00 | 00 32 03 eb ff ff 00 00 |.&EPOS..|.2......|
|00003120| 00 00 00 00 00 00 03 ec | ff ff 00 00 00 44 00 00 |........|.....D..|
|00003130| 00 00 03 ed ff ff 00 00 | 00 4c 00 00 00 00 00 00 |........|.L......|
|00003140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+